library(dplyr)
library(tidyr)
library(ggplot2)
library(palmerpenguins)
set_blanket()
penguins |>
drop_na() |>
gg_jitter(
x = species,
y = flipper_length_mm,
col = island,
mapping = aes(shape = sex),
) +
guides_shape_grey()
Run the code above in your browser using DataLab