library(tidyverse) library(palmerpenguins) library(colorblindr) ggplot(penguins, aes(x = bill_length_mm, y = bill_depth_mm, color = species)) + geom_point() + scale_color_OkabeIto()
ggplot(penguins, aes(x = flipper_length_mm, y = body_mass_g, color = species)) + geom_point() + scale_color_OkabeIto()