demo/ex13.03.R

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
kmiddleton/zar5 documentation built on May 20, 2019, 12:51 p.m.