Nothing
rpe <- function(n, theta, lambda) {
u <- Rfast2::Runif( n )
( log( theta ) - log( - log( u - exp( - theta ) * ( u - 1 ) ) ) ) / 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.