Nothing
DIME.plot.fit <-
function(data, obj, ...)
{
obj <- obj$best;
if (obj$name =="NUDGE"){
nudge.plot.fit(data, obj, ...);
}else if (obj$name=="iNUDGE"){
inudge.plot.fit(data, obj, ...);
}else{
gng.plot.fit(data, obj, ...);
}
}
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.