\frametitle {Testing individual coefficients, cont'}
{\tiny
\begin{verbatim}
Call:
lm(formula = Price ~ 1 + Food + Service + Decor, data = nyc)

Coefficients:
            Estimate Std. Error t value Pr(>|t|)
(Intercept) -24.6409     4.7536  -5.184 6.33e-07 ***
Food          1.5556     0.3731   4.170 4.93e-05 ***
Service       0.1350     0.3957   0.341    0.733
Decor         1.8473     0.2176   8.491 1.17e-14 ***

Residual standard error: 5.803 on 164 degrees of freedom
Multiple R-squared: 0.617, Adjusted R-squared:  0.61
F-statistic: 88.06 on 3 and 164 DF,  p-value: < 2.2e-16

##############
Call:
lm(formula = Price ~ 1 + Food + Service, data = nyc)

Coefficients:
            Estimate Std. Error t value Pr(>|t|)
(Intercept) -21.1586     5.6651  -3.735 0.000258 ***
Food          1.4954     0.4462   3.351 0.000997 ***
Service       1.7041     0.4185   4.072 7.22e-05 ***

Residual standard error: 6.942 on 165 degrees of freedom
Multiple R-squared: 0.4486, Adjusted R-squared: 0.4419
F-statistic: 67.12 on 2 and 165 DF,  p-value: < 2.2e-16
\end{verbatim}
}