Заменить метки осей на обычные в старших графиках - PullRequest
Новая
       11

Заменить метки осей на обычные в старших графиках

0 голосов
/ 18 ноября 2018

Как я могу разместить буквы на метках оси якс?

Я хочу, чтобы метки яксиса были (a, e, i, o, u) вместо (0,25,50,75,100),но я получаю (а, 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)%>%   
...

спасибо

1 Ответ

0 голосов
/ 18 ноября 2018

Это не проблема, categories в hc_yAxis назначается последовательно, поэтому в вашем случае он будет заменен с 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)

И результат:

...