Stats 321

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

## 
## Call:
## lm(formula = f$Price ~ log(f$Mileage))
## 
## Residuals:
##    Min     1Q Median     3Q    Max 
## -80032 -18549  -3125  14107 112887 
## 
## Coefficients:
##                Estimate Std. Error t value Pr(>|t|)    
## (Intercept)      656780      47801   13.74  < 2e-16 ***
## log(f$Mileage)   -51446       4865  -10.57 3.76e-13 ***
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
## 
## Residual standard error: 33950 on 40 degrees of freedom
## Multiple R-squared:  0.7365, Adjusted R-squared:   0.73 
## F-statistic: 111.8 on 1 and 40 DF,  p-value: 3.758e-13
##     Price Mileage Age
## 1  159900   10488  27
## 2  179500    9100  26
## 3  135000   33464  24
## 4   86500   24590  28
## 5   89500   64467  25
## 6  129950   22875  25
## 7  225000    4274  27
## 8  129000   37000  27
## 9   89500   46410  27
## 10 164700   49132  27
## 11 158500   23294  25
## 12 290000   11200  30
## 13 399900     171  25
## 14 169500    8951  28
## 15  97500   38000  28
## 16 118000   48400  24
## 17 199990    5657  25
## 18 115000   38157  28
## 19  89500   64467  25
## 20 129900   40100  26
## 21  83775   50400  25
## 22 135800   16600  26
## 23 179500   17812  24
## 24 129000   14994  27
## 25 169500    8951  28
## 26  83775   50400  25
## 27 149888   24752  26
## 28  62500   21935  27
## 29 135900   24700  27
## 30  49900   51772  28
## 31 249999    7322  26
## 32  89500   50000  25
## 33 189900    9300  27
## 34 169500    8951  28
## 35 142900   12289  26
## 36 219999    2233  27
## 37 250000    5997  25
## 38 199800   20400  29
## 39 170000    9500  27
## 40 165000   27500  29
## 41 159900   20479  25
## 42 139500   21287  28