javascript - 在 highcharts r 中用自定义替换轴标签

Question

如何在 yaxis 轴标签上放置字母？

我希望 yaxis 标签是 (a,e,i,o,u) 而不是 (0,25,50,75,100)，但我得到的是 (a,25,50,75,100)

我正在尝试以下操作

highchart() %>%
  hc_chart(type="bar",zoomType="x") %>%
  hc_yAxis(
    categories = c("a","e","i","o","u"),
    title='',
    tickInterval=25,
    min=0,
    max=100)%>%   
...

谢谢

Answer 1

这不是问题，hc_yAxis 中的 categories 是按顺序分配的，因此在您的情况下，它将从 0 替换为 5(包括)。您可以使用 seq 破解它并替换它。

categories_list <- list("0"="a","25"="e","50"="i","75"="o","100"="u")
categories <- seq(0, 100)

for (v in names(categories_list)) {
  categories[[as.integer(v) + 1]] <- categories_list[[v]]
}

highchart() %>%
  hc_add_series(name = "Tokyo", data = citytemp$tokyo) %>% 
  hc_add_series(name = "New York", data = citytemp$new_york) %>%
  hc_add_series(name = "Berlin", data = citytemp$berlin) %>% 
  hc_chart(type="bar",zoomType="x") %>%
  hc_yAxis(
    categories = categories,
    title='',
    tickInterval=25,
    min=0,
    max=100)

结果: