R quantmod chart_Series：关闭add_TA的RHS y轴标签（作为指标靠近一起覆盖刻度）

Question

我正在尝试关闭右侧y轴标签。 我试图这样做的原因是，如果你有一些指标靠近在一起，那么RHS规模会被覆盖。

我可以通过改变myTheme

来做到这一点

library(quantmod)
getSymbols("SPY", from="2013-01-01", to=Sys.Date())


myTheme <- chart_theme()
myTheme$rylab <- FALSE

chart_Series(SPY,theme=myTheme)

但当我添加一个指示符时，它会再次出现

add_TA(SMA(SPY[,4],20),on=1,col="black",lty=2, lwd = 1,legend = NULL)

如何切换指标的RHS y轴？ 另外如何让LHS上的y轴有更大的字体？

我很感激你的帮助。

Answer 1

[已编辑]您在theme=myTheme

之后重复add_TA(...)的申请

myPars <-chart_pars(); myPars$cex<-1.5
cspy <- chart_Series(SPY,theme=myTheme, pars=myPars)
cspy <- add_TA(SMA(SPY[,4],20),on=1,col="black",lty=2, lwd = 1,legend = NULL)
cspy
cspy<- chart_Series(SPY,theme=myTheme, pars=myPars)
cspy

请注意，您需要再次使用我昨天向您展示的保证金扩展策略，因为LHS的默认保证金不足。