\begin{Schunk}
\begin{Sinput}
 ## Check column means
 colMeans(X)
\end{Sinput}
\begin{Soutput}
[1]  1.1008238  1.9931514  1.1021634 -0.2079248 -0.1264216
\end{Soutput}
\begin{Sinput}
 ## Check Pearson Correlations
 cor(X)
\end{Sinput}
\begin{Soutput}
          [,1]      [,2]      [,3]      [,4]      [,5]
[1,] 1.0000000 0.3581434 0.3040862 0.3085298 0.3271159
[2,] 0.3581434 1.0000000 0.2762719 0.3117241 0.3361439
[3,] 0.3040862 0.2762719 1.0000000 0.3015170 0.2782909
[4,] 0.3085298 0.3117241 0.3015170 1.0000000 0.3168756
[5,] 0.3271159 0.3361439 0.2782909 0.3168756 1.0000000
\end{Soutput}
\end{Schunk}
