\begin{Schunk}
\begin{Sinput}
 summary(m2)
\end{Sinput}
\begin{Soutput}
Call:
glm(formula = yobs ~ x, family = gaussian, data = dat)

Deviance Residuals: 
    Min       1Q   Median       3Q      Max  
-0.7449  -0.1137  -0.1137   0.2551   0.8863  

Coefficients:
            Estimate Std. Error t value Pr(>|t|)    
(Intercept)  0.11373    0.01685   6.749 2.52e-11 ***
x            0.63117    0.02407  26.220  < 2e-16 ***
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

(Dispersion parameter for gaussian family taken to be 0.1448058)

    Null deviance: 244.07  on 999  degrees of freedom
Residual deviance: 144.52  on 998  degrees of freedom
AIC: 909.51

Number of Fisher Scoring iterations: 2
\end{Soutput}
\end{Schunk}
