df <- data.frame(
x = c("a", "b", "c", "d", "c"),
y = c(100, 200, 200, 700, 300)
)
df |>
e_charts(x) |>
e_bar(y) |>
e_zigzag(axis = 'y', start = 400, end = 500)
df |>
e_charts(x) |>
e_bar(y) |>
e_zigzag(axis = 'y', start = c(125,400), end = c(150,500))
Run the code above in your browser using DataLab