Nothing
"calc.relimp.default" <-
function (object, x = NULL, ..., type = "lmg", diff = FALSE, rank = TRUE, rela = FALSE, always = NULL,
groups = NULL, groupnames=NULL, weights=NULL, design=NULL)
{
ynam = deparse(substitute(object)) ## make labelling of y ok
do.call("calc.relimp_default.intern", list(object=object, x=x, ...,
type=type, diff=diff, rank=rank, rela=rela, always=always,
groups=groups, groupnames = groupnames, weights=weights, design=design,ynam=ynam))
}
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.