\begin{Schunk}
\begin{Sinput}
 round(mod1pcor^2, 4)
\end{Sinput}
\begin{Soutput}
          EX   ECAB    MET   GROW    OLD  YOUNG   WEST
EX    1.0000 0.2097 0.0788 0.0422 0.0016 0.0190 0.1393
ECAB  0.2097 1.0000 0.0129 0.0013 0.1934 0.2960 0.0129
MET   0.0788 0.0129 1.0000 0.0197 0.2224 0.4159 0.0034
GROW  0.0422 0.0013 0.0197 1.0000 0.1896 0.0473 0.0289
OLD   0.0016 0.1934 0.2224 0.1896 1.0000 0.6836 0.1096
YOUNG 0.0190 0.2960 0.4159 0.0473 0.6836 1.0000 0.1642
WEST  0.1393 0.0129 0.0034 0.0289 0.1096 0.1642 1.0000
\end{Soutput}
\end{Schunk}
