Фасетная функция в старших чартах - PullRequest
0 голосов
/ 21 октября 2018

У меня есть данные наподобие этого примера:

df <-
  data.frame(
    date = seq(as.Date("2015-01-01"), as.Date("2015-12-31"), 100),
    id = rep(LETTERS, each = 4)[1:100],
    replicate(2, sample(1001, 100))
  )

График с ggplot в порядке

ggplot(df, aes(x = date)) +
  geom_line(aes(y = X1)) +
  geom_line(aes(y = X2), linetype = 2) +
  facet_wrap( ~ id , scales = "free") 

Я нашел некоторую информацию о реализации фасета в старшей диаграмме higcharter-grid-test и я попытался построить его на старшей диаграмме, чтобы создать интерактивный график, но highchart::hw_grid() и browsable() устарели.Кто-нибудь может мне помочь с отображением моих данных?

Мой фрагмент:

  highchart() %>% 
    hc_add_series(name = "X1", data = df$X1) %>% 
    hc_add_series(name = "X2", data = df$X2) %>% 
    hw_grid(id, rowheight = 200, ncol = 3)
...