Nothing
formula.rma <- function(x, type="mods", ...) {
mstyle <- .get.mstyle("crayon" %in% .packages())
.chkclass(class(x), must="rma")
type <- match.arg(type, c("mods", "yi", "scale"))
if (type == "scale" && x$model != "rma.ls")
stop(mstyle$stop("Can only use type='scale' for location-scale models."))
if (type == "mods")
return(x$formula.mods)
if (type == "yi")
return(x$formula.yi)
if (type == "scale")
return(x$formula.scale)
}
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.