1

作为独立代码,隐藏/取消隐藏正在工作,但不是闪亮的

我有一个数据框 df 如下

Date       Category     Number
2014-01-01   AA            2
2014-01-01   BB            4
2014-01-01   CC            3
2014-01-01   DD            11
2014-01-02   AA            21
2014-01-02   BB            14
2014-01-02   CC            12
2014-01-02   DD            14
2014-01-03   AA            11
2014-01-03   BB            13
2014-01-03   CC            9
2014-01-03   DD            11

我正在尝试使用隐藏/取消隐藏选项绘制堆积条形图。我尝试使用下面的示例隐藏/取消隐藏不起作用。如果我隐藏了中间的数据,它就不会重新缩放。 http://glimmer.rstudio.com/reinholdsson/rHighcharts/

我也尝试了下面的示例,但它令人困惑并且根本没有显示任何情节。 http://rcharts.io/viewer/?5842467#.UuuYLKX-aQw

我的代码是

b <- rCharts:::Highcharts$new()
b$chart(type = "column")
b$plotOptions(column = list(stacking = "normal"))
b$xAxis(categories = unique(as.character(df$Date)))
tt = sapply(unique(as.character(df$Category)), function(name){
   d <- df[df$Category == name, ]
   b$series(name = name, data = d$Number, stack = d$Category[[1]])
})
b

使用上面的代码,堆叠选项消失了。

4

1 回答 1

0

我变了

b$series(name = name, data = d$Number, stack = d$Category[[1]])

b$series(name = name, data = d$Number, stack = d$Date[[1]])

花了一点时间就明白了。我想按日期堆叠,所以必须在这里选择日期。

但是隐藏/取消隐藏并没有重新缩放,而是消失了与类别对应的栏。

于 2014-01-31T14:06:40.787 回答