this is _penguins.qmd

In [2]:

library(ggplot2)
ggplot(mtcars, aes(mpg, cyl)) +
  geom_point(aes(color = gear)) +
  theme_minimal()

Figure 1