Themes

# Themes

**Session 5**

]

---

# Plan for today

.box-5.medium.sp-after-half[CRAP and ggplot]

.box-6.medium.sp-after-half[The anatomy of a ggplot theme]

---

name: crap-ggplot
class: center middle section-title section-title-5 animated fadeIn

# CRAP and ggplot

---

---

# Universal principles

.box-inv-5.sp-after[Proximity]

.box-5.medium[These design principles apply everywhere!]

.box-inv-5.small[Graphic design, art, music, architecture… and graphs!]

---

# Is that gray background okay?

---

# Applying CRAP to ggplot

.box-inv-5.sp-after[We can follow CRAP principles to make big improvements to our plots]

.box-inv-5.sp-after[Claus Wilke's chapter covers lots of these graph-specific principles]

.box-inv-5.medium[We can apply these principles to ggplot plots]

---

# Like this!

```r
library(hrbrthemes)

ggplot(mpg, aes(x = displ, y = hwy, 
                color = drv)) +
  geom_point(size = 2) +
  theme_ipsum_ps()
```
]

---

# And this!

```r
library(hrbrthemes)

ggplot(mpg, aes(x = displ, y = hwy, 
                color = drv)) +
  geom_point(size = 2) +
  theme_modern_rc()
```
]

---

# Or this!

```r
library(ggthemes)

ggplot(mpg, aes(x = displ, y = hwy, 
                color = drv)) +
  geom_point(size = 2) +
  scale_color_economist() +
  theme_economist()
```
]

---

# And even this!

```r
library(ggpomological)

ggplot(mpg, aes(x = displ, y = hwy, 
                color = drv)) +
  geom_point(size = 2) +
  scale_color_pomological() +
  theme_pomological_fancy()
```
]

---

# One magic, powerful function

&nbsp;

.box-inv-5.huge[`theme()`]

---

layout: false
name: anatomy
class: center middle section-title section-title-6 animated fadeIn

# The anatomy of a `ggplot()` theme

---

---

# Theme system

.center[
<figure>
 <a href="https://henrywang.nl/ggplot2-theme-elements-demonstration/" target="_blank"><img src="img/05/theme_elements-1024x755.png" alt="ggplot theme elements" title="ggplot theme elements" width="65%"></a>
</figure>
]

???

By [Henry Wang](https://henrywang.nl/ggplot2-theme-elements-demonstration/)

---

# Theme elements

.box-inv-6.medium[Each element in the plot can be targeted]

---

# Theme functions

.box-inv-6.medium[Use special functions to manipulate specific elements]

---

# How to learn `theme()`

.box-inv-6.medium[The `theme()` function has **94** possible arguments(!!!)]

.box-inv-6.small.sp-after[You can get hyper-specific with things like `axis.ticks.length.x.bottom`]

---

# How to learn `theme()`

&nbsp;

.box-6.medium[I cannot show you everything]