highcharter не отображает все значения по оси x и hc_colorAxis не работает - PullRequest
Новая
       8

highcharter не отображает все значения по оси x и hc_colorAxis не работает

0 голосов
/ 16 декабря 2018

Я работаю с пакетом highcharter, чтобы красиво построить графики в R и внедрить их в Shiny.Я работаю с этими наборами данных https://www.kaggle.com/currie32/crimes-in-chicago и использую этот код: 

library(dplyr)
library(highcharter)
library(xts)
library(tidyverse)

locationAnalysis <- cc %>% group_by(Location.Description) %>% summarise(Total = n()) %>% arrange(desc(Total))

crimetypeAnalysis <- cc %>% group_by(Primary.Type) %>% summarise(Total = n()) %>% arrange(desc(Total))

hchart(crimetypeAnalysis, "column", hcaes(x = Primary.Type, y = Total, color = Total)) %>%
  hc_title(text = "Crime Types") %>%
  hc_subtitle(text = "(2001 - 2016)") %>%
  hc_xAxis(title = list(text = "Type")) %>%
  hc_yAxis(title = list(text = "Crimes")) %>%
  hc_colorAxis(stops = color_stops(n = 10, colors = c("#d98880", "#85c1e9", "#82e0aa"))) %>%
  hc_add_theme(hc_theme_darkunica()) %>%
  hc_legend(enabled = FALSE)

Код работает нормально, и сюжет выглядит великолепно, но у меня есть 2 проблемы.Код должен отображать 36 типов преступлений на оси х, но здесь было показано только 18, почему?Вторая проблема: я не могу изменить цвет hc_colorAxis(stops = color_stops(n = 10, colors = c("#d98880", "#85c1e9", "#82e0aa"))).Это всегда берет начальный, который использовался первым, а не этот шестнадцатеричный код, который у меня есть в моем коде, почему?Надеюсь, кто-нибудь может мне помочь и заранее спасибо!

...