R Shiny App HighCharter OHLC/ Подсвечники период масштабирования по умолчанию

Question

Я использую библиотеку highcharter для блестящего приложения, чтобы создать график свечей XTS. Код в server.R для создания диаграммы приведен ниже (к сожалению, этот код не воспроизводится). По умолчанию сгенерированная диаграмма показывает данные за весь период. Я хочу изменить масштаб на 1 месяц. Это эквивалентно нажатию на «1 м» в параметрах масштабирования. Как я могу это сделать?

      library(highcharter)  
output$ohlcPlot <- renderHighchart({
    if (IsValidNSESymbol(input$x1StockCode)) {
      df <- loadStockPrices()
      
      highchart(type = "stock") %>%
        hc_add_series(data = df,
                      name = "OHLC",
                      type = "candlestick") %>%
        hc_colors(color = "red")
    }
  })

Answer 1

Можете добавить %>% hc_rangeSelector(selected = 0) для сохранения значения месяца по умолчанию, где 0 - позиция параметра масштабирования.

Например, с AAPL акции.

      library(highcharter)

quantmod::getSymbols('AAPL',src = 'yahoo',from = "2013-01-01", to = "2017-12-31")
highchart(type = "stock") %>% 
  hc_add_series(data = AAPL, 
                name = "OHLC",
                type = "candlestick") %>%
  hc_colors(color = "red") %>%
  hc_rangeSelector(selected = 0)