Nothing
dcc <- function(y, mu = 0, lambda, logged = FALSE) {
den <- log( tanh(lambda * pi) ) - log(pi) + log(lambda) - log( lambda^2 + (y - mu)^2 )
if ( !logged ) den <- exp(den)
den
}
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.