Я пытаюсь изменить цвета полосок с помощью аргумента 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")
Посмотрите на код. 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)
