Nothing
`logLik.mlcm` <-
function(object, ...) {
if (object$method == "glm")
val <- logLik(object$obj) else {
val <- object$logLik
attr(val, "df") <- length(object$par)
class(val) <- "logLik"
}
val
}
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.