Я пытаюсь использовать Highchart для графика, где мне нужно сгруппировать оси X.
Моя попытка:
> data<-read.csv("C:/Users/sd13519/Desktop/Data.csv",stringsAsFactors = FALSE)
> data
ORDER TL ML MXL CL DATE
1 460 15 5.5 25 19 10/19/2018
2 610 15 5.5 25 18 10/26/2018
3 535 15 5.5 25 19 10/25/2018
4 679 15 5.5 25 16 10/31/2018
5 677 15 5.5 25 16 10/31/2018
6 456 15 5.5 25 11 10/19/2018
7 405 15 5.5 25 13 10/17/2018
8 409 15 5.5 25 12 10/18/2018
9 400 15 5.5 25 13 10/16/2018
10 462 15 5.5 25 16 10/22/2018
11 617 15 5.5 25 11 10/29/2018
12 331 15 5.5 25 13 10/15/2018
13 333 15 5.5 25 11 10/16/2018
14 407 15 5.5 25 16 10/17/2018
15 466 15 5.5 25 16 10/23/2018
16 615 15 5.5 25 16 10/29/2018
17 537 15 5.5 25 11 10/25/2018
18 474 15 5.5 25 19 10/24/2018
19 476 15 5.5 25 19 10/24/2018
20 675 15 5.5 25 17 10/31/2018
21 402 15 5.5 25 18 10/16/2018
22 612 15 5.5 25 13 10/26/2018
23 458 15 5.5 25 11 10/19/2018
24 464 15 5.5 25 12 10/22/2018
> categories_grouped <- data %>%
group_by(name = DATE) %>%
do(categories = .$ORDER) %>%
list_parse()
> hc<-highchart()%>%
hc_xAxis(categories=categories_grouped,title = list(text = "Order No with Date"))%>%
hc_yAxis(title = list(text = "Performance"),labels = list(format= '{value}',style=list(color="#4682B4")))%>%
hc_tooltip(shared=TRUE)%>%
hc_add_series(name="TL",data=data$TL)%>%
hc_add_series(name="ML",data=data$ML)%>%
hc_add_series(name="MXL",data=data$MXL)%>%
hc_add_series(name="CL",data=data$CL)
hc
Участок выглядит как
Последняя отмеченная красным часть отображается неправильно.
Возможно, я неправильно понял концепцию группировки категорий ..
Мне нравится отображать порядок в соответствии с их категориями дат.
но отображение категории происходит некорректно ..
Я обнаружил, что записи на
- 10/15/2018 - 331 заказ
- 10/18/2018 - 409 заказ
- 10/23/2018 - 466 заказ
Все остальные дни имеют более 1 записей, но эти даты имеют отдельные записи.
Так что, если я создаю список по группам, как считать или разрешить это
Получена помощь от этого
заранее спасибо ...