\begin{Schunk}
\begin{Sinput}
 summary(mod1)
\end{Sinput}
\begin{Soutput}
Call:
lm(formula = tann ~ elevation, data = dat1)

Residuals:
    Min      1Q  Median      3Q     Max 
-2.6841 -0.6026 -0.1081  0.7613  2.1034 

Coefficients:
              Estimate Std. Error t value Pr(>|t|)    
(Intercept) 11.6881385  0.1502978   77.77   <2e-16 ***
elevation   -0.0032377  0.0002016  -16.06   <2e-16 ***
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Residual standard error: 0.9582 on 90 degrees of freedom
Multiple R-squared:  0.7413,	Adjusted R-squared:  0.7385 
F-statistic: 257.9 on 1 and 90 DF,  p-value: < 2.2e-16
\end{Soutput}
\end{Schunk}
