summary(cars)
##      speed           dist       
##  Min.   : 4.0   Min.   :  2.00  
##  1st Qu.:12.0   1st Qu.: 26.00  
##  Median :15.0   Median : 36.00  
##  Mean   :15.4   Mean   : 42.98  
##  3rd Qu.:19.0   3rd Qu.: 56.00  
##  Max.   :25.0   Max.   :120.00
wd<-getwd()
cars<-read.csv("cars_data.csv")
  1. What is the average (mean()) mpg for all cars?
mean(cars$mpg)
## [1] 20.09062
  1. What is the minimum mpg for all cars?
min(cars$mpg)
## [1] 10.4
  1. What is the maximum mpg for all cars?
max(cars$mpg)
## [1] 33.9
  1. How many cars are there in the dataset? (Hint: length() of mpg)
length(cars$X)
## [1] 32