echarts4r上的瀑布图?
Waterfall chart on echarts4r?
您好,感谢您阅读我的文章
我正在使用 Echarts4r 包在 R 上使用条形图,但我想做一个瀑布图,但我没有找到一个选项来绘制如下图所示的图:
这种图表类型可以做吗?我现在使用的代码如下:
library(echarts4r)
df <- data.frame(
var = sample(LETTERS, 5),
value = rnorm(5, mean = 200, sd = 100)
)
df |>
e_charts(var) |>
e_bar(value)
不确定 echarts4r
是否提供开箱即用的选项,但通过一些数据争论,您可以将结果作为堆积条形图实现,如下所示:
免责声明:我借鉴了here的基本思想。
library(echarts4r)
library(dplyr)
set.seed(42)
df <- data.frame(
var = sample(LETTERS, 5),
value = rnorm(5, mean = 200, sd = 100)
)
df |>
mutate(bottom = cumsum(dplyr::lag(value, default = 0)),
bottom = ifelse(value < 0, bottom + value, bottom),
top = abs(value)) |>
e_charts(var) |>
e_bar(bottom, stack = "var", itemStyle = list(color = "transparent", barBorderColor = "transparent")) |>
e_bar(top, stack = "var")
您好,感谢您阅读我的文章
我正在使用 Echarts4r 包在 R 上使用条形图,但我想做一个瀑布图,但我没有找到一个选项来绘制如下图所示的图:
这种图表类型可以做吗?我现在使用的代码如下:
library(echarts4r)
df <- data.frame(
var = sample(LETTERS, 5),
value = rnorm(5, mean = 200, sd = 100)
)
df |>
e_charts(var) |>
e_bar(value)
不确定 echarts4r
是否提供开箱即用的选项,但通过一些数据争论,您可以将结果作为堆积条形图实现,如下所示:
免责声明:我借鉴了here的基本思想。
library(echarts4r)
library(dplyr)
set.seed(42)
df <- data.frame(
var = sample(LETTERS, 5),
value = rnorm(5, mean = 200, sd = 100)
)
df |>
mutate(bottom = cumsum(dplyr::lag(value, default = 0)),
bottom = ifelse(value < 0, bottom + value, bottom),
top = abs(value)) |>
e_charts(var) |>
e_bar(bottom, stack = "var", itemStyle = list(color = "transparent", barBorderColor = "transparent")) |>
e_bar(top, stack = "var")