Add nested data
Utility function to add data where the original JavaScript library expects nested data.
e_add(e, param, ...)
e |
An |
param |
The nested parameter to add data to. |
... |
Any other option to pass, check See Also section. |
For instance, e_funnel lets you pass values and labels
(from your initial data.frame) which corresponds to name and value in the
original library.
However the latter also takes, label, itemStyle, and emphasis but being JSON arrays
they translate to lists in R and dealing with nested data.frames is not ideal. e_add remedies to that.
It allows adding those nested data points, see the examples below.
# funnel can take nested itemStyle
# https://echarts.apache.org/en/option.html#series-funnel.data
funnel <- data.frame(
stage = c("View", "Click", "Purchase"),
value = c(80, 30, 20),
color = c("blue", "red", "green")
)
funnel %>%
e_charts() %>%
e_funnel(value, stage) %>%
e_add("itemStyle", color)
# Heatmap can take nested label
# https://echarts.apache.org/en/option.html#series-heatmap.data
v <- LETTERS[1:10]
matrix <- data.frame(
x = sample(v, 300, replace = TRUE),
y = sample(v, 300, replace = TRUE),
z = rnorm(300, 10, 1),
stringsAsFactors = FALSE
) %>%
dplyr::group_by(x, y) %>%
dplyr::summarise(z = sum(z)) %>%
dplyr::ungroup() %>%
dplyr::mutate(
show = TRUE,
fontStyle = round(runif(dplyr::n(), 5, 12))
)
matrix %>%
e_charts(x) %>%
e_heatmap(y, z) %>%
e_visual_map(z) %>%
e_add(
"label",
show,
fontStyle
)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.