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

```{.r .cell-code}
ggplot(data = diamonds, aes(x = cut, fill=color)) +
  geom_bar(position = "dodge", color = "black") +
  coord_flip() +
  scale_fill_brewer(palette = "Blues")
```

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