01 — Orientation

# .kjh-yellow[Visualizing] .kjh-lblue[Social Data]

**Week 01**

]

---

# .middle.center.huge.squish4.kjh-lblue[What we'll be Doing]

---

---

---

---

---

---

---

---

---

---

# Course Website

&nbsp;

.center.huge.squish4.kjh-lblue[[https://visualizingsociety.com](https://visualizingsociety.com)]

---

# Get up and Running: Install R

---

# The R Project Website

&nbsp;

.center.huge.squish4.kjh-lblue[[https://www.r-project.org](https://www.r-project.org)]

---

# Get up and Running: Install RStudio

---

# The RStudio / Posit Website

&nbsp;

.center.huge.squish4.kjh-lblue[[https://www.posit.co](https://www.posit.co)]

---

---

---

---

# Try .kjh-yellow[knitting] your notes

.w80.large[
- **Don't worry if it's not clear what's happening at this point.**]

---

# Now write the following code

.pull-left.w40[

Write this out inside the "code chunk" in your notes.

```r
library(tidyverse)
library(gapminder)

p <- ggplot(data = gapminder, 
 mapping = aes(x = gdpPercap, 
 y = lifeExp))

p + geom_point()
```
]

... And knit your document again.

.pull-right.w50[
<img src="01-slides_files/figure-html/codefig-first-plot-1.png" width="384" style="display: block; margin: auto;" />
]

---

---

# .huge.squish4.kjh-lblue[We should .kjh-yellow[look at] data]

---

# .huge.squish4.kjh-lblue[We can .kjh-yellow[look at] society]