Nothing
#[export]
riag <- function(n, mu) {
p <- length(mu)
x <- Rfast::matrnorm(n, p) + rep(mu, rep(n, p))
x / sqrt( Rfast::rowsums(x^2) )
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.