---
title: "quizplots"
author: "BJ"
date: "9/27/2021"
output:
  pdf_document: default
  html_document: default
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
library(ggplot2)
library(GGally)
```

First we read in the data and look at the variables...
```{r}
data <- read.csv("pgatour2006.csv",header=T)
str(data)
```
"Name" is just each golfer's name.
"TigerWoods" is an indicator (0/1) variable for whether the golfer is Tiger Woods (who earned very large amounts of prize money at the time)...

Let's look at all the variables except "Name"...
```{r}
ggpairs(data[,-1])
```


