Saving

# Saving
### Gina Reynolds, July 2019

---

# The written language: Save plots as objects and to disk

Now you should know how to build a ggplot.  How can you save that plot?

First, you can save the entire plot as an object using the assignment operator `<-`.  Below we call the plot `g`.  Then use the function ggsave() to save out your plot.

```r
g <- ggplot(gapminder_2002) +
  aes(x = gdpPercap) +
  aes(y = lifeExp) +
  geom_point()

ggsave(filename = "figures/my_plot0.png",
       plot = g, height = 5, width = 8)
```

---

```r
ggsave(filename = "figures/my_plot.png",  
       plot = g,  
       height = 6, width = 8)

knitr::include_graphics(path = "figures/my_plot.png")  
```
]
 
.right-panel-save-1[
<img src="figures/my_plot.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot1.png",  
       plot = g,  
       height = 5, width = 8)

knitr::include_graphics(path =  
                          "figures/my_plot1.png")  
```
]
 
.right-panel-save1-1[
<img src="figures/my_plot1.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot2.png",  
       plot = g,  
       height = 5, width = 8,  
       dpi = 30)

knitr::include_graphics(path =  
                          "figures/my_plot2.png")  
```
]
 
.right-panel-save2-1[
<img src="figures/my_plot2.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot3.png",  
       plot = g,  
       height = 5, width = 8,  
       dpi = 300)  # max
knitr::include_graphics(path = "figures/my_plot3.png")  
```
]
 
.right-panel-save3-1[
<img src="figures/my_plot3.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot4.png",  
       units = "in",  
       plot = g,  
       height = 5, width = 8,  
       dpi = 300)  # max
knitr::include_graphics(path = "figures/my_plot4.png")  
```
]
 
.right-panel-save4-1[
<img src="figures/my_plot4.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot5.png",  
       units = "in",  
       plot = g,  
       height = 8, width = 8,  
       dpi = 300)  # max
knitr::include_graphics(path = "figures/my_plot5.png")  
```
]
 
.right-panel-save5-1[
<img src="figures/my_plot5.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot6.png",  
       units = "in",  
       plot = g,  
       height = 8, width = 5,  
       dpi = 300)

knitr::include_graphics(path = "figures/my_plot6.png")  
```
]
 
.right-panel-save6-1[
<img src="figures/my_plot6.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot7.png",  
       units = "in",  
       plot = g,  
       height = 8, width = 5,  
*      dpi = 50)
knitr::include_graphics(path = "figures/my_plot7.png")  
```
]
 
.right-panel-save7-1[
<img src="figures/my_plot7.png" width="100%" />
]

---

```r
ggsave(filename = "figures/my_plot8.png",  
       units = "in",  
       plot = g,  
       height = 8, width = 5,  
*      dpi = 20)
knitr::include_graphics(path = "figures/my_plot8.png")  
```
]
 
.right-panel-save8-1[
<img src="figures/my_plot8.png" width="100%" />
]

---

Next up is [composition](ensembles.html) -- plot ensembles my help tell your stories.