ChartSeries AddTA(OBV())错误[TTR]

Question

我的生产代码中有一个ChartSeries错误。代码如下

chartSeries(Stock, theme = chartTheme("white"), TA=c(addTA(ATR(Stock[,c("High","Low","Close")], n=14)), addTA(ADX(Stock[,c("High","Low","Close")])), addTA(OBV(Stock[,"Close"], Stock[,"Total.Trade.Quantity"])), addTA(chaikinAD(Stock[,c("High","Low","Close")], Stock[,"Total.Trade.Quantity"])), addTA(CMF(Stock[,c("High","Low","Close")], Stock[,"Total.Trade.Quantity"])), addRSI(), addSMI(), addMACD(type = "DEMA"), addBBands(), addDEMA(n = 20, on = 1, with.col = Cl, overlay = TRUE, col = "blue")), subset='last 4 months')

错误代码：

Seq.default中的错误(min( to * 0.975，na.rm = TRUE)，max( to * 1.05，na.rm = TRUE)，“from”必须是一个有限的数字，此外:警告消息: 1: In (to* 0.975，na.rm = TRUE)：不丢失参数给min；返回Inf 2: in max(to* 1.05，na.rm = TRUE)：向max返回无缺失参数；返回-Inf

数据文件信息：

因此，我的数据文件，一个xts样式的OHLCV (csv)，共有4718行中的1行，有3个NA值(在文件的第一行)。其余的行完全没有其他NA值填充。

编辑：

只是省略了包含NA值的行，但仍然得到了相同的错误。所以这个错误必须做一些其他的事情。

编辑2：

因此，我发现错误局限于addTA(股票，“关闭”，股票，“Total.Trade.Quantity”)函数/参数。有什么建议或建议吗？

Answer 1

此代码解决了您的问题：

Stock <- AAPL["2018-08"]
chartSeries(Stock, theme="white")
addTA(OBV(Cl(Stock), Vo(Stock)))

加入OBV的股票价格图表