1. Showing tech specs for specifed car
   
2. Showing actual MPG value for specifed car
   
3. Showing predicted MPG value for specifed car

• The model for predicting the MPG value is based on my work for "Regression Models" course project.
  
• The formula for the model is:
  
  

techs <- function(car) mtcars[car,]
car <- "Mazda RX4"
round(9.618-3.917*techs(car)$wt+1.226*techs(car)$qsec
      +2.936*techs(car)$am,digits=2)

## [1] 22.47