在 highcharts r 中用自定义替换轴标签
Replace axis labels with custom in highcharts r
如何在 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)%>%
...
谢谢
这不是问题,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)
结果:
如何在 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)%>%
...
谢谢
这不是问题,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)
结果: