echart <- iris |>
group_by(Species) |>
e_charts(Sepal.Length) |>
e_line(Sepal.Width) |>
e_tooltip(trigger = "axis")
e_matrix_raw(rows = 3, cols = 3, body = list(
itemStyle = list(borderWidth = 0))) |>
e_matrix_addChart(echart, coord = list(
c(0,2),0), margin_trbl = c("b" = "20%"))
Run the code above in your browser using DataLab