Nothing
rgep <- function(n, beta, alpha, lambda) {
u <- Rfast2::Runif( n )
( - beta ** - 1 ) * log( 1 + (lambda ** - 1) * log(1 - u ** ( 1 / alpha ) * ( 1 - exp( - lambda ) ) ) )
}
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.