e_charts() |>
e_gauge(57, "PERCENT")
# timeline
data.frame(time = 2015:2017) |>
group_by(time) |>
e_charts(timeline = TRUE) |>
e_gauge(
c(57, 23, 65),
c("percent", "percentage", "cases")
)
Run the code above in your browser using DataLab