R/predict.singleton.R

predict.singleton <-
function(object, type = c('response', 'class', 'nonzero'), ...)
{
  type = match.arg(type)
  if (type == 'nonzero') return(NULL)
  return(object[[type]])
}

Try the customizedTraining package in your browser

Any scripts or data that you put into this service are public.

customizedTraining documentation built on May 2, 2019, 2:31 p.m.