_live-coding-example.qmd

---
title: "Live Coding Example"
format: pdf
bibliography: refs.bib
---

# Introduction

Penguins are **fun**!

```{r}
#| warning: false
#| echo: false
#| fig-cap: "Plot some flippers"
#| label: fig-penguins
library(palmerpenguins)
library(ggplot2)
ggplot(penguins, aes(x = flipper_length_mm)) +
  geom_histogram()
```

@fig-penguins shows data from the *palmerpenguins* dataset.
The dataset has `r nrow(penguins)` rows and `r ncol(penguins)` columns.
The data has been published in @horst2020.

# References