Avg mpg is…

cars_data<-read.csv("cars_data.csv")
mean(cars_data$mpg)
## [1] 20.09062

Minimum mpg is…

min(cars_data$mpg)
## [1] 10.4

Maximum mpg is…

max(cars_data$mpg)
## [1] 33.9

Amount of cars in the dataset…

length(cars_data$mpg)
## [1] 32