library(SveltePlots)
data("penguins")
sp <- sp(
data = penguins,
mapping = spaes(x = flipper_length_mm, y = bill_length_mm, group = species),
type = "points",
facet_var = "sex"
) |>
SveltePlots::sp_facet(ncol = 2, scales = "free")
sp
Run the code above in your browser using DataLab