R Highchart X轴分组类别

时间:2018-11-06 11:44:21

标签: r highcharts r-highcharter

我试图在需要对X轴进行分组的地方使用Highchart作图。

我的尝试:

> 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

剧情看起来像enter image description here

最后一个红色标记的部分未正确显示。 我可能误解了分组类别的概念。 我喜欢根据日期类别显示订单。 但是类别显示不正确。.

我发现

上的记录
  1. 2018年10月15日-331订单
  2. 2018年10月18日-409个订单
  3. 2018年10月23日-466个订单

所有其他日子都有多于1条记录,但是该日期只有一条记录。 因此,如果我通过分组来考虑或允许这样做来创建列表?

this获得帮助 预先感谢...

0 个答案:

没有答案