R/tabulate.ext.err.func.R

"tabulate.ext.err.func" <- function(pred.obj, obs.grp)
  return(1 - sum(diag(table(pred.obj, obs.grp)))/length(obs.grp))
LXQin/precision documentation built on May 11, 2019, 6:24 p.m.