sarah rodriguez homework week two

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

length(cars_data$mpg)

## [1] 32

mean(cars_data$mpg)

## [1] 20.09062

max(cars_data$mpg)

## [1] 33.9

min(cars_data$mpg)

## [1] 10.4

```