如何在 R 的 Highchart 瀑布图中添加 "isSum" 栏？

Question

我关注 this 网站使用 Highcharts 在 R 中制作瀑布图。但我无法在最后添加 "isSum" 栏。关于如何在 .js 中操作很容易获得，但不适用于 R。

我还尝试在最后的 df 中添加一个名称为 "isSum" 的列并插入 true/false（在最后添加累积和行之后）但是它没有用.也尝试在 hc_series 选项下执行 "isSum=T" 但没有成功。

示例如下：

df=data.frame(y=c(232,345,544,100),name=c("one","two","three","four"))    

highchart()%>%
  hc_chart(type="waterfall")%>%
  hc_add_series(df)

上面的输出：

Answer 1

我的回答并不完美，因为我不是 R 程序员 - 也许可以做得更好。我不知道如何定义数据以在 R 中包含 isSum 属性，但我知道如何在 JavaScript.

中进行

我在 R 中使用了 JS() 函数，它允许我们注入 JavaScript 代码，我这样更新了最后一点：

library(highcharter)

df=data.frame(y=c(232,345,544,100),name=c("one","two","three","four"))    

highchart()%>%
  hc_chart(type="waterfall", events = list(load = JS("function () {
          this.series[0].points[3].update({
            isSum: true
          });
  }")))%>%
  hc_add_series(df)

编辑我明白了。您可以像这样在数据中定义它：

df=data.frame(y=c(232,345,544,100),name=c("one","two","three","four"),isSum=c(FALSE, FALSE, FALSE, TRUE))

如何在 R 的 Highchart 瀑布图中添加 "isSum" 栏？

How to add the "isSum" bar in Highchart Waterfall chart in R?

r

highcharts

r-highcharter