R/mvn.R

Defines functions .rmvn

# single multivariate normal draw
.rmvn <- function(mean, sigma) {
  (rnorm(length(mean)) %*% chol(sigma))[1,] + mean
}
mlysy/nicheROVER documentation built on Oct. 17, 2023, 2:21 p.m.