iris |>
group_by(Species) |>
e_charts(Sepal.Length) |>
e_scatter(Sepal.Width) |>
e_lm(Sepal.Width ~ Sepal.Length) |>
e_x_axis(min = 4)
mtcars |>
e_charts(disp) |>
e_scatter(mpg, qsec) |>
e_loess(mpg ~ disp, smooth = TRUE, showSymbol = FALSE)
# timeline
iris |>
group_by(Species) |>
e_charts(Sepal.Length, timeline = TRUE) |>
e_scatter(Sepal.Width) |>
e_lm(Sepal.Width ~ Sepal.Length) |>
e_x_axis(min = 4, max = 8) |>
e_y_axis(max = 5)
Run the code above in your browser using DataLab