Consider the Housing data: > dim(Housing) [1] 3000 13 > names (Housing) [1] "logprice" [4] "land.acres" [7] "bathrooms" [10] "Bricks" [13] "AGE" "bldg.full" "main.living.area" "bedrooms" "total.full" "total.living.area" "I 'rooms" "Garage" "BasementSize" Question 1. Given the following scatter plot. House Price Vs. Total Full logprice 17.5- 15.0- 12.5- 10.0- 7.5- 5.0- 0e+00 5e+05 1e+06 total.full > m1.1 summary(m1.1) factor(Garage) No Yes Garage No Yes 1 Call: ~ 1m (formula = logprice total.full* Garage, data Coefficients: = Housing) Estimate Std. Error t value Pr(>|t|) (Intercept) total.full GarageYes total.full:GarageYes -7.639e-06 Residual standard error: 0.5249 on degrees of freedom Multiple R-squared: ' Adjusted R-squared: 1.027e+01 3.1360-02 327.69