Nothing
makeDbdpars <- function(alpha,beta,ntop,zeta,ndata) {
rslt <- list(alpha=alpha,beta=beta,ntop=ntop,zeta=zeta,ndata=ndata)
class(rslt) <- "Dbdpars"
rslt
}
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.