HW 2

cars_data<-read.csv("cars_data.csv")
colnames(cars_data)

##  [1] "X"    "mpg"  "cyl"  "disp" "hp"   "drat" "wt"   "qsec" "vs"   "am"  
## [11] "gear" "carb"

What is the average (mean()) mpg for all cars?

mean(cars_data$mpg)

## [1] 20.09062

What is the minimum mpg for all cars?

min(cars_data$mpg)

## [1] 10.4

What is the maximum mpg for all cars?

max(cars_data$mpg)

## [1] 33.9

How many cars are there in the dataset?

length(cars_data$X)

## [1] 32