predict.mrelnet=function(object, newx, s = NULL, type = c("link", "response",
"coefficients", "nonzero"), exact = FALSE, offset, ...)
{
type=match.arg(type)
if(type=="response")type="link"
object$grouped=TRUE
predict.multnet(object,newx,s,type,exact,offset,...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.