---
title: "Palmer Penguins (.qmd)"
---

```{r}
library(tidyverse)
library(palmerpenguins)
```

Data from [Palmer Penguins R package](https://allisonhorst.github.io/palmerpenguins/)


```{r}
penguins |> count(species)
```


```{r}
colors <- c("#FF8C00", "#A020F0", "#008B8B")
```

```{r}
#| label: fig-size-scatter
#| fig-width: 3
#| fig-height: 3
ggplot(penguins, aes(body_mass_g, flipper_length_mm)) +
  geom_point(aes(color = species)) +
  scale_color_manual(values = colors) +
  theme_minimal()
```