14.1 Data: Palmer Penguins
There exist multiple penguin species throughout Antarctica, including the Adelie, Chinstrap, and Gentoo. When encountering one of these penguins on an Antarctic trip, we might classify its species
\[Y = \begin{cases} A & \text{Adelie} \\ C & \text{Chinstrap} \\ G & \text{Gentoo} \end{cases}\]

three species
\(X_{1}\) categorical variable: whether the penguin weighs more than the average 4200 grams
\[X_{1} = \begin{cases} 1 & \text{above-average weight} \\ 0 & \text{below-average weight} \end{cases}\]

AKA culmen length and depth
numerical variables:
\[\begin{array}{rcl} X_{2} & = & \text{bill length (mm)} \\ X_{3} & = & \text{flipper length (mm)} \\ \end{array}\]
data(penguins_bayes)
<- penguins_bayes
penguins
= "#fb7504"
adelie_color = "#c65ccc"
chinstrap_color = "#067476"
gentoo_color
%>%
penguins tabyl(species)
## species n percent
## Adelie 152 0.4418605
## Chinstrap 68 0.1976744
## Gentoo 124 0.3604651