df <- data.frame(
axis = LETTERS[1:10],
value = runif(10, 3, 20),
size = runif(10, 3, 20)
)
df |>
e_charts(axis) |>
e_single_axis() |> # add the single axis
e_scatter(
value,
size,
coord_system = "singleAxis"
)
Run the code above in your browser using DataLab