rnormal_poisson <- function(n, mean=0, sd = 1){ r = exp(rnorm(n,mean=mean,sd=sd)) return(rpois(n,r)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.