r - 使用Highcharter创建负堆积条形图(Likert图)

梦想是Jkunst做出回应，但我试图创建一个带有highcharter的负堆积条形图，例如此处的highcharts演示-http://jsfiddle.net/KV5KV/

我试过交换所有选项，什么都不交换，但我似乎无法让它一次显示多个系列，如果有人可以帮忙的话，那太好了。这是我要在R中运行的内容。

 highchart() %>%
      hc_chart(type = "bar") %>%
      hc_title(text = "stuff") %>%
      hc_yAxis(title = list(text = ""),
               labels = list(format = "{value}"), min=0) %>%
      hc_plotOptions(column = list(
        series=list(stacking='normal'),
        dataLabels = list(enabled = FALSE),
        enableMouseTracking = TRUE)) %>%
      hc_legend(enabled = FALSE) %>%
      hc_xAxis(reversed=FALSE,opposite=TRUE,reversed=FALSE, linkedTo=0) %>%
      hc_series(list(name="Value",color=c("#766A62"),data=list(-10, -5, -6)))    %>%
      hc_add_series(list(name="Value",color=c("#766A62"),data=list(-2, -5, -3)))  %>%
      hc_add_series(list(name="neutral",id='neutral',color=c("#766A62"),data=list(-2, -5, -3)))  %>%
      hc_add_series(list(name="Value",color=c("#766A62"),data=list(5, 1,6)))  %>%
      hc_add_series(list(name="Value",color=c("#766A62"),data=list(2, 5, 3)))  %>%
      hc_add_series(list(linkedTo='neutral',name="neutral",color=c("#766A62"),data=list(6, 8, 2)))

最佳答案

我已经做了。

highchart() %>%
  hc_chart(type = "bar") %>%
  hc_title(text = "Experimental Survey Questions breakdown") %>%
  hc_yAxis(title = list(text = ""),
           labels = list(format = "{value}")) %>%
  hc_plotOptions(series=list(stacking='normal'),column = list(
    dataLabels = list(enabled = FALSE),
    enableMouseTracking = TRUE)) %>%
  hc_legend(enabled = FALSE) %>%
  hc_xAxis(reversed=FALSE,opposite=TRUE,reversed=FALSE) %>%
  hc_add_series(name="Value",color=c("rgb(205,35,35)"),data=list(-10, -5, -6))    %>%
  hc_add_series(name="Values",color=c("rgb(165,85,85)"),data=list(-2, -5, -3))  %>%
  hc_add_series(name="neutral",id='neutral',color=c("#766A62"),data=list(-2, -5, -3))  %>%
  hc_add_series(name="Valuess",color=c("rgb(35,35,205)"),data=list(5, 1,6))  %>%
  hc_add_series(name="Valuesss",color=c("rgb(85,85,165)"),data=list(2, 5, 3))  %>%
  hc_add_series(name="Neutral",linkedTo='neutral',color=c("#766A62"),data=list(6, 8, 2))

^为那些寻求答案的人剪裁和晾干，特别感谢优秀的ol jbkunst，他制作了这个令人惊叹的库，并彻底改变了我介绍我的研究的方式(您最好，他们避免了wuz;)

我仍然有一个问题，如何获取实际值以链接在一起(中性线穿过其中，这很line脚。)

关于r - 使用Highcharter创建负堆积条形图(Likert图)，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/38729251/