highcharter: исправление меток оси x в столбчатой ​​диаграмме только с одним столбцом

Question

У меня есть следующий код для создания простого графика столбца, и он отлично работает:

library(highcharter)
d1 <- iris %>% group_by(Species) %>% 
  summarize(mean_sepal_width = mean(Sepal.Width))

highchart() %>% 
  hc_chart(type = 'column') %>% 
  hc_xAxis(categories = d1$Species) %>% 
  hc_add_series(data = d1$mean_sepal_width)

Однако, когда я поднастроил входные данные так, что существует только одна переменная x, метки оси x будут сломано:

d2 <- d %>% filter(Species == 'virginica')
highchart() %>% 
  hc_chart(type = 'column') %>% 
  hc_xAxis(categories = d2$Species) %>% 
  hc_add_series(data = d2$mean_sepal_width)

Здесь предлагается потенциальное решение ( Столбчатая диаграмма Highcharter обрезана по метке оси x ), но я Я предпочитаю не использовать функцию hchart (), поскольку мой фактический график намного сложнее.

Есть ли способ исправить эти метки оси x?

Answer 1

Поместите d2$Species в список (или используйте as.list). Это известная ошибка .

highchart() %>% 
  hc_chart(type = 'column') %>% 
  hc_xAxis(categories = as.list(d2$Species)) %>% 
  hc_add_series(data = d2$mean_sepal_width)