powered by
rmvnorm(n, mu, Sigma, Sigma.chol = chol(Sigma))
Sigma
n
## The function is currently defined as function (n, mu, Sigma, Sigma.chol = chol(Sigma)) { E <- matrix(rnorm(n * length(mu)), n, length(mu)) t(t(E %*% Sigma.chol) + c(mu)) }
Run the code above in your browser using DataLab