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)

修改chart_Series主题

1 个答案: