R 另一种量子模之字形叠加

我目前正在使用

quantmod

ZigZag覆盖，我注意到它的计算方式与原始覆盖略有不同。 我已经演示了以下RDWR的不同之处：使用Z字形（5%）和

quantmod

以及一个不同的程序。如您所见，

quantmod

缺少有效点峰值和高点的分配。 使用时，您也可以非常清楚地看到差异

我认为这是因为

quantmod

平滑趋势的方式。算法应该同时使用高值和低值，而不仅仅是平均价格或其他回归。 我想知道

quantmod

或者

TTR

是否提供了一种替代的锯齿形叠加，可以产生所需的输出（如图上部所示）

谢谢

用于在图片中显示

quantmod

输出的代码为

s<-get(getSymbols('rdwr'))["2012-07::"]
chart_Series(s)
add_TA(ZigZag(s,5),on=1)

---

s问题在于
？ZigZag
表示输入应该是高/低价格系列，而您提供了OHLCVA系列。如果您提供高/低系列，它将正常工作

s <- getSymbols('rdwr', auto.assign=FALSE)
chart_Series(s, subset="2012-07::")
add_TA(ZigZag(s[,2:3],5),on=1)

s FWIW，它与
chartSeries
一起工作，如下所示：
chartSeries（s）；添加之字形（5）
，或一步
图表系列（s，TA=“添加之字形（5）”）
。我认为在
chart\u系列
框架上还有一些工作要做……没错！z+1，但z字形有点模棱两可。它说，
HL
应该是一个“可强制转换为xts或矩阵的对象，并且包含一个高-低价格序列或一个接近价格序列。”。[重点补充]。考虑到quantmod通常使用
HLC
、
Cl
等内容对输入进行子集化，因此期望ZigZag与OHLCVA对象一起工作似乎是合理的。@GSee:唉，我明白这可能会有多混乱。