Stats 321 Class Project

## Warning: package 'ggplot2' was built under R version 3.1.3

## 
## Call:
## lm(formula = Price ~ Mileage, data = F150)
## 
## Residuals:
##      Min       1Q   Median       3Q      Max 
## -13021.9  -3007.7     61.2   3066.0  11373.5 
## 
## Coefficients:
##               Estimate Std. Error t value Pr(>|t|)    
## (Intercept)  3.641e+04  8.238e+02   44.20   <2e-16 ***
## Mileage     -1.498e-01  7.830e-03  -19.13   <2e-16 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 4910 on 106 degrees of freedom
## Multiple R-squared:  0.7754, Adjusted R-squared:  0.7732 
## F-statistic: 365.9 on 1 and 106 DF,  p-value: < 2.2e-16

## 
## Call:
## lm(formula = Price ~ Age, data = F150)
## 
## Residuals:
##      Min       1Q   Median       3Q      Max 
## -12279.3  -2851.8    286.5   3030.7  13171.5 
## 
## Coefficients:
##             Estimate Std. Error t value Pr(>|t|)    
## (Intercept) 34863.69     703.29   49.57   <2e-16 ***
## Age         -2012.05      96.79  -20.79   <2e-16 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 4598 on 106 degrees of freedom
## Multiple R-squared:  0.803,  Adjusted R-squared:  0.8012 
## F-statistic: 432.1 on 1 and 106 DF,  p-value: < 2.2e-16

Combined Model:

## 
## Call:
## lm(formula = F150$Price ~ F150$Age + F150$Mileage)
## 
## Residuals:
##     Min      1Q  Median      3Q     Max 
## -7232.3 -2221.7  -250.8  1824.9 10592.6 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)   3.714e+04  5.798e+02   64.06  < 2e-16 ***
## F150$Age     -1.202e+03  1.136e+02  -10.59  < 2e-16 ***
## F150$Mileage -7.949e-02  8.603e-03   -9.24 3.11e-15 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 3431 on 105 degrees of freedom
## Multiple R-squared:  0.8914, Adjusted R-squared:  0.8893 
## F-statistic: 430.7 on 2 and 105 DF,  p-value: < 2.2e-16