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
danielkick/Zar5 documentation built on May 28, 2019, 2:52 p.m.