R quantmod在日线图上显示周指标

我试图在每日图表上显示每日和每周RSI，但没有成功

getSymbols('JNUG')
chartSeries(JNUG, subset = 'last 4 months', dn = 'red', TA = 'addRSI(n=14); addLines(h = c(30, 70), on = 2, col = "red"); addTA(RSI(Cl(to.weekly(JNUG)), n =2))')

我还尝试了以下方法：

chartSeries(JNUG, subset = 'last 4 months', dn = 'red', TA = 'addRSI(n=14); addLines(h = c(30, 70), on = 2, col = "red")')
addTA(RSI(Cl(to.weekly(JNUG)), n =14))

---

每周RSI不会出现在绘图上。有人能帮忙吗。

当您绘制周点时，NA值会在合并到原始每日数据之间填充。每周RSI图希望将点和NAs连接在一起，作为一个直线图，但在有NAs的地方没有画线，最后也没有画线

试试这个：

chartSeries(JNUG, subset = 'last 4 months', dn = 'red', TA = 'addRSI(n=14); addLines(h = c(30, 70), on = 2, col = "red"); addTA(RSI(Cl(to.weekly(JNUG)), n =2), type = "p")')

或者，如果您需要行，请尝试以下操作（请参阅最低的

add\u TA

call）：

---

绘制周点时，NA值将在合并到原始每日数据的过程中填充。每周RSI图希望将点和NAs连接在一起，作为一个直线图，但在有NAs的地方没有画线，最后也没有画线

试试这个：

chartSeries(JNUG, subset = 'last 4 months', dn = 'red', TA = 'addRSI(n=14); addLines(h = c(30, 70), on = 2, col = "red"); addTA(RSI(Cl(to.weekly(JNUG)), n =2), type = "p")')

或者，如果您需要行，请尝试以下操作（请参阅最低的

add\u TA

call）：

---

太棒了！如何将rsi水平线放在第三条上？@geodex查看编辑。使用

on

参数（on=1、2或3）选择要添加额外曲线的绘图面板。干杯@FXQuantTraderamazing！如何将rsi水平线放在第三条上？@geodex查看编辑。使用

on

参数（on=1、2或3）选择要添加额外曲线的绘图面板。Cheers@FXQuantTrader

chart_Series(JNUG, subset = '2016-01/')
add_RSI(n= 14)
v <- to.weekly(JNUG)
# Note: na.locf does not introduce 'lookforward bias' in visualised technical indicator plots, while na.spline does.
add_TA(merge(xts(order.by = index(JNUG)), RSI(Cl(v)), fill = na.locf), type = 'l')
low_rsi <- 30 
hi_rsi <- 70
xrsi_low <- xts(order.by = index(JNUG), x = rep(low_rsi, NROW(JNUG)))
xrsi_hi <- xts(order.by = index(JNUG), x = rep(hi_rsi, NROW(JNUG)))
add_TA(xrsi_low, col = "purple", type = 'l', on = 3, lty = 2)
add_TA(xrsi_hi, col = "purple", type = 'l', on = 3, lty = 4)