R/riag.R

Defines functions riag

Documented in riag

#[export]
riag <- function(n, mu) {
  p <- length(mu)
  x <- Rfast::matrnorm(n, p) +  rep(mu, rep(n, p))
  x / sqrt( Rfast::rowsums(x^2) )
}

Try the Rfast2 package in your browser

Any scripts or data that you put into this service are public.

Rfast2 documentation built on Aug. 8, 2023, 1:11 a.m.