Comment on the fitness of the model, the significance of your model, the significance of the coefficients (in all cases use a 10% level of significance) and provide an interpretation of the coefficients in your final model Call: lm(formula = eggs$Cases ~ eggs$`Egg Price` eggs$`First Week` eggs$Easter eggs$Week) Residuals: Min 1Q Median 3Q Max -12603.1 -5135.9 255.7 4824.7 22479.8 Coefficients: Estimate Std. Error t value Pr(>|t|) (Intercept) 194954.22 8990.57 21.684 < 2e-16 *** eggs$`Egg Price` -174.29 91.78 -1.899 0.06050 . eggs$`First Week`Yes 4914.29 1672.49 2.938 0.00411 ** eggs$EasterNon Easter -76255.52 5322.10 -14.328 < 2e-16 *** eggs$EasterPost Easter -96491.55 7449.20 -12.953 < 2e-16 *** eggs$EasterPre Easter -44245.55 7329.14 -6.037 2.81e-08 *** eggs$Week 97.42 23.04 4.228 5.30e-05 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Residual standard error: 7116 on 98 degrees of freedom Multiple R-squared: 0.7819, Adjusted R-squared: 0.7686 F-statistic: 58.56 on 6 and 98 DF, p-value: < 2.2e-16