Nothing
runifcens <- function(n, cens.par) {
return( runif(n=n, min=0, max=cens.par) )
}
rexpcens <- function(n, cens.par) {
return( rexp(n=n, rate=1/cens.par) )
}
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.