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))
rebeccahch/precision documentation built on May 27, 2019, 4 a.m.