::: {.cell layout-align="center"}

```{.r .cell-code}
ggplot(data = mtcars, aes(x = as.factor(cyl), y = mpg)) +
  geom_boxplot()
```

::: {.cell-output-display}
![](ggplot2_basics_slides_files/figure-revealjs/unnamed-chunk-4-1.png){fig-align='center' width=960}
:::
:::