微调 addADX() 以避免截断趋势曲线

Fine tuning addADX() to avoind truncating the trend curves

我正在使用以下代码查看过去 9 个月的股票。

library(quantmod)
getSymbols("AMZN")
candleChart(to.weekly(AMZN),multi.col=TRUE,theme="white",subset='last 9 months') 
addADX()

你可以看到红线基本上没有包含在图中,因为它大部分位于值 20 以下。我想修改 addADX 的 Y 轴范围,以便它始终显示所有三个线。怎么可能?

addADX()的输入参数只控制方向运动指数的计算-而不是根据平均方向指数设置的图形参数。

完整显示正负方向指数的简单解决方法是使用 TTR 包中的 ADX() 自行计算方向运动指数,然后使用 addTA(),允许更多自定义。

library(quantmod)
getSymbols("AMZN")
dat <- to.weekly(AMZN)
candleChart(dat, multi.col = TRUE, theme = "white", subset = "last 9 months")
adx <- ADX(HLC(dat), n = 14, maType = "EMA", wilder = TRUE)[, c("DIp", "DIn", "ADX")]
addTA(adx, col = c("green", "red", "blue"), lwd = c(1, 1, 2), legend = NULL)