> data <- read.csv("pgatouor2006.csv",header=T)
Error in file(file, "rt") : cannot open the connection
In addition: Warning message:
In file(file, "rt") :
  cannot open file 'pgatouor2006.csv': No such file or directory
> data <- read.csv("pgatour2006.csv",header=T)
> names(data)
 [1] "Name"               "TigerWoods"         "PrizeMoney"        
 [4] "AveDrivingDistance" "DrivingAccuracy"    "GIR"               
 [7] "PuttingAverage"     "BirdieConversion"   "SandSaves"         
[10] "Scrambling"         "BounceBack"         "PuttsPerRound"     
> par(mfrow=c(4,3))
> for (i in names(data)) { hist(data[,i],title=i)}
Error in hist.default(data[, i], title = i) : 'x' must be numeric
> for (i in names(data)[-1]) { hist(data[,i],title=i)}
There were 44 warnings (use warnings() to see them)
> for (i in names(data)[-1]) { hist(data[,i],main=i)}
> par(mfrow=c(4,3))
> for (i in names(data)[-1]) { hist(data[,i],main=i)}
> dev.new()
> par(mfrow=c(4,3))
> for (i in names(data)[-1]) { qqnorm(data[,i],main=i); qqline(data[,i]) }
> library(car)
Loading required package: carData
Warning messages:
1: package ¡®car¡¯ was built under R version 3.4.4 
2: package ¡®carData¡¯ was built under R version 3.4.4 
> fit <- lm(PrizeMoney ~ ., data=data)
> help(boxCox)
starting httpd help server ... done
> dev.new()
> boxCox(fit)
Error in plot.window(...) : need finite 'ylim' values
>