There is a very small data set ‘mileage.csv’ on Sakai that shows car mileage versus car speed for a random sample of vehicles. Load the data set, conduct some exploratory analysis, obtain a least squares line for the data and check some associated diagnostics.
cars <- read.csv("mileage.csv", header=TRUE)
cars## case mpg spd X
## 1 1 22 35 NA
## 2 2 20 35 NA
## 3 3 28 40 NA
## 4 4 31 40 NA
## 5 5 37 45 NA
## 6 6 38 45 NA
## 7 7 41 50 NA
## 8 8 39 50 NA
## 9 9 34 55 NA
## 10 10 37 55 NA
## 11 11 27 60 NA
## 12 12 30 60 NA
## Try quadratic model (we will do this in class)