params <- function(obj,...) UseMethod("params")
run <- function(obj,...) UseMethod("run")
## Use logLik which is standad method
##logLikelihood <- function(obj,...) UseMethod("logLikelihood")
contrast <- function(obj,...) UseMethod("contrast")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.