Nothing
`ll.aRC` =
function(par0, ni, ni0, xs, theta){
mu = par0[1] + par0[2] * xs
lpi = mu - log1p(exp(mu))
logL = -logBB(ni, ni0, exp(lpi), theta)
return(logL)
}
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.