Utility function to add data where the original JavaScript library expects nested data.

e_add(e, param, ...)



An echarts4r object as returned by e_charts or a proxy as returned by echarts4rProxy.


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)) )
#> `summarise()` regrouping output by 'x' (override with `.groups` argument)
matrix %>% e_charts(x) %>% e_heatmap(y, z) %>% e_visual_map(z) %>% e_add( "label", show, fontStyle )