library(readr)
cars_data<-read.csv("cars_data.csv")
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? (Hint: length() of mpg)
length(cars_data$mpg)
## [1] 32