Nothing
"simdurbin" <-
function(n, alpha, mu,seta, seps){
eps <- rnorm(n, mean=0, sd=seps)
eta <- rnorm(n, mean=0, sd=seta)
y <- alpha + mu*exp(eta) + eps
y
}
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.