Data
dodgers_data <- read.csv("DodgersData.csv")
summary(dodgers_data)
## month day attend day_of_week
## Length:81 Min. : 1.00 Min. :24312 Length:81
## Class :character 1st Qu.: 8.00 1st Qu.:34493 Class :character
## Mode :character Median :15.00 Median :40284 Mode :character
## Mean :16.14 Mean :41040
## 3rd Qu.:25.00 3rd Qu.:46588
## Max. :31.00 Max. :56000
## opponent temp skies day_night
## Length:81 Min. :54.00 Length:81 Length:81
## Class :character 1st Qu.:67.00 Class :character Class :character
## Mode :character Median :73.00 Mode :character Mode :character
## Mean :73.15
## 3rd Qu.:79.00
## Max. :95.00
## cap shirt fireworks bobblehead
## Length:81 Length:81 Length:81 Length:81
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##