data("state")
as.data.frame(state.x77) |>
e_charts(Population) |>
e_scatter(Income, Frost) |>
e_visual_map(Frost, scale = e_scale) |>
e_legend(FALSE) |>
e_visual_map_range(
selected = list(60, 120)
)
Run the code above in your browser using DataLab