\begin{Schunk}
\begin{Sinput}
 names(m1)
\end{Sinput}
\begin{Soutput}
 [1] "coefficients"  "residuals"     "effects"       "rank"          "fitted.values" "assign"       
 [7] "qr"            "df.residual"   "xlevels"       "call"          "terms"         "model"        
\end{Soutput}
\begin{Sinput}
 coef(m1) ## just the betas
\end{Sinput}
\begin{Soutput}
(Intercept)           x 
  29.780173    1.998473 
\end{Soutput}
\begin{Sinput}
 names(m1.summary)
\end{Sinput}
\begin{Soutput}
 [1] "call"          "terms"         "residuals"     "coefficients"  "aliased"       "sigma"        
 [7] "df"            "r.squared"     "adj.r.squared" "fstatistic"    "cov.unscaled" 
\end{Soutput}
\begin{Sinput}
 coef(m1.summary) ## Parameter table
\end{Sinput}
\begin{Soutput}
             Estimate Std. Error  t value     Pr(>|t|)
(Intercept) 29.780173 0.50952160 58.44732 5.451129e-78
x            1.998473 0.09424465 21.20516 2.138829e-38
\end{Soutput}
\end{Schunk}
