修改图表_系列主题

Question

我试图使用theme参数更改条形的颜色，但出现错误：

library(quantmod)
getSymbols("SPY", from=Sys.Date()-500, to=Sys.Date())
chart_Series(SPY)
chart_Series(SPY,theme=chart_theme(dn.col = "cyan"))
# Error in chart_theme(dn.col = "cyan") : unused argument (dn.col = "cyan")

Answer 1

看一下代码。chart_theme不需要争论，所以尝试chart_theme(dn.col="cyan")没有意义。

> args(chart_theme)
function () 
NULL

chart_theme()返回一个列表，并且您想要修改其中的部分内容，因此只需这样做即可。

myTheme <- chart_theme()
myTheme$col$dn.col <- "cyan"
chart_Series(SPY,theme=myTheme)