Nothing
gen_gamma <- function(n, shape, rates) {
sapply(rates, function(rate) rgamma(n, shape, rate))
}
gen_pois <- function(n, m, how_many = 5) {
replicate(how_many, rpois(n, m))
}
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.