# NOT RUN {
df <- data.frame(
x = 1:10,
y = runif(10, 5, 10)
) |>
dplyr::mutate(
lwr = y - runif(10, 1, 3),
upr = y + runif(10, 2, 4)
)
df |>
e_charts(x) |>
e_line(y) |>
e_band(lwr, upr)
# }
Run the code above in your browser using DataLab