01-Visualize.Rmd

---
title: "Visualize Data"
output: html_notebook
---

<!-- This file by Charlotte Wickham is licensed under a Creative Commons Attribution 4.0 International License, adapted from the orignal work at https://github.com/rstudio/master-the-tidyverse by RStudio. -->

```{r setup}
library(tidyverse)
```


```{r}
mpg
```

## Quiz

What relationship do you expect to see between engine size (displ) and highway fuel efficiency (hwy)?

## Your Turn 1

Run the code on the slide to make a graph. Pay strict attention to spelling, capitalization, and parentheses!

```{r}


```

## Your Turn 2

Add `color`, `size`, `alpha`, and `shape` aesthetics to your graph. Experiment.  

```{r}
ggplot(data = mpg) + 
  geom_point(mapping = aes(x = displ, y = hwy))
```

## Your Turn 3

Replace this scatterplot with one that draws boxplots. Use the cheatsheet. Try your best guess.

```{r}
ggplot(data = mpg) +
  geom_point(mapping = aes(x = class, y = hwy))
```

## Your Turn 4

Make a histogram of the `hwy` variable from `mpg`.

```{r}
ggplot(data = mpg) 

```

## Your Turn 5

Make a density plot of `hwy` colored by `class`.

```{r}
ggplot(data = mpg) 

```

## Your Turn 6

Make a bar chart `class` colored by `class`.

```{r}
ggplot(data = mpg) 

```

## Your Turn 7

Predict what this code will do. Then run it.

```{r}
ggplot(mpg) + 
  geom_point(aes(displ, hwy)) +
  geom_smooth(aes(displ, hwy))
```

## Your Turn 8

What does `getwd()` return?

```{r}
getwd()
```

## Your Turn 9

Save the last plot and then locate it in the files pane.

```{r}

```

***

# Take aways

You can use this code template to make thousands of graphs with **ggplot2**.

```{r, eval = FALSE}
ggplot(data = <DATA>) +
  <GEOM_FUNCTION>(mapping = aes(<MAPPINGS>))
```