## Method to overwrite parameters of an existing MaxControl object
addControlDddot <- function(x, ...) {
## add ... to the control
dddot <- list(...)
dddot <- dddot[names(dddot) %in% openParam(x)]
addControlList(x, dddot)
##
}
setMethod("maxControl", "MaxControl", addControlDddot)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.