\begin{Schunk}
\begin{Soutput}
Potentially influential observations of
	 lm(formula = posAffect ~ agency, data = dat) :

    dfb.1_ dfb.agnc dffit   cov.r   cook.d hat    
1   -0.10   0.11     0.12    1.02_*  0.01   0.02_*
25  -0.02   0.03     0.03    1.02_*  0.00   0.02  
26   0.31  -0.30     0.31_*  1.01    0.05   0.03_*
38   0.07  -0.06     0.07    1.02_*  0.00   0.01  
95   0.11  -0.12    -0.13    1.02_*  0.01   0.02_*
129 -0.06   0.07     0.08    1.02_*  0.00   0.01  
131  0.08  -0.09    -0.10    1.02_*  0.01   0.02_*
136  0.14  -0.13     0.14    1.03_*  0.01   0.03_*
146 -0.10   0.11     0.11    1.03_*  0.01   0.03_*
177 -0.02  -0.01    -0.16    0.96_*  0.01   0.00  
196  0.02  -0.04    -0.13    0.98_*  0.01   0.00  
211 -0.06   0.04    -0.12    0.98_*  0.01   0.00  
229  0.27  -0.26     0.28_*  1.00    0.04   0.02_*
230  0.07  -0.08    -0.08    1.02_*  0.00   0.02_*
232 -0.16   0.14    -0.20    0.97_*  0.02   0.00  
245  0.11  -0.10     0.11    1.02_*  0.01   0.02_*
252 -0.06   0.07     0.07    1.03_*  0.00   0.02_*
256  0.04  -0.05    -0.06    1.02_*  0.00   0.01  
261 -0.03   0.03     0.04    1.02_*  0.00   0.01  
280  0.05  -0.05     0.05    1.03_*  0.00   0.02_*
294  0.05  -0.05     0.05    1.02_*  0.00   0.01  
305  0.34  -0.32     0.35_*  1.00    0.06   0.02_*
336 -0.04   0.00    -0.18    0.95_*  0.02   0.00  
353  0.05  -0.05    -0.06    1.02_*  0.00   0.02  
368  0.18  -0.21    -0.25_*  0.98_*  0.03   0.01  
373  0.01  -0.01    -0.01    1.02_*  0.00   0.01  
\end{Soutput}
\end{Schunk}
