Установите цвет фона для quantmod :: chart_Series - PullRequest
Новая
       8

Установите цвет фона для quantmod :: chart_Series

0 голосов
/ 24 ноября 2018

У меня есть xts объект с именем adjPrices.xts, который содержит историю цен акций OHLC.Функция quantmod :: chartSeries при вызове следующим образом отображает эти данные на графике с черным фоном: 

chartSeries(adjPrices.xts,
            subset = '2014-07-01::2015-07-01',
            type = 'bars',
            name = paste(symbol, 'Adjusted Prices'),
            TA = NULL)

enter image description here

Однако Quantmod:: chart_Series с теми же параметрами создает диаграмму с белым фоном: 

chart_Series(adjPrices.xts,
            subset = '2014-07-01::2015-07-01',
            type = 'bars',
            name = paste(symbol, 'Adjusted Prices'),
            TA = NULL)

enter image description here

Я хочу изменить цвет фона этого второго графикак черному, и я следую подходу, предложенному в этом ответе .Цветовые атрибуты chart_theme (): 

> chart_theme()$col
$`bg`
[1] "#FFFFFF"

$label.bg
[1] "#F0F0F0"

$grid
[1] "#F0F0F0"

$grid2
[1] "#F5F5F5"

$ticks
[1] "#999999"

$labels
[1] "#333333"

$line.col
[1] "darkorange"

$dn.col
[1] "red"

$up.col
[1] NA

$dn.border
[1] "#333333"

$up.border
[1] "#333333"

. Это наводит меня на мысль, что я могу установить черный цвет фона следующим образом: 

myTheme <- chart_theme()
myTheme$col$`bg` <- "black"
chart_Series(adjPrices.xts,
            subset = '2014-07-01::2015-07-01',
            theme = myTheme,
            type = 'bars',
            name = paste(symbol, 'Adjusted Prices'),
            TA = NULL)

Но полученный график все еще имеет белый цветфон: enter image description here Я также попытался определить myTheme следующим образом: 

myTheme <- chart_theme()
myTheme$col$`bg` <- "#000000"

, но в результирующем графике все еще есть белый фон.

Как установитьчерный фон при использовании chart_Series ()?

1 Ответ

0 голосов
/ 25 ноября 2018

На данный момент вы не можете.Для этого на github существует старая, еще не решенная проблема # 25 .Обходной путь будет вызывать графические параметры R с помощью par:

. Это создаст черный фон. 

par_old <- par(bg = "black")
chart_Series(SPY)
par(par_old)

Некоторые другие обходные пути используют rtsplot.Основан на графике R и имеет возможность рисовать свечи.Цвет фона задается с помощью par: 

rtsplot::rtsplot(SPY, type = "candle")

xts имеет графическое окружение plot.xts, но он не обрабатывает свечи.

Tidyquant имеет geom_candlestick для ggplot2, но в настоящий момент они не работают, если вы используете ggplot2> 3.0.Смотрите этот Tidyquant Github выпуск

...