str(ex13.03)
colMeans(ex13.03)
apply(ex13.03, 2, var)
x <- sqrt(ex13.03 + 0.5)
x
colMeans(x)
apply(x, 2, var)
apply(x, 2, FUN = function(x) sd(x)/sqrt(length(x)))
colMeans(x)^2 - 0.5
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.