R/accuracy.R

accuracy <- function(actual, prediction){
  # How often did it predict the correct class?
  return(sum(prediction == actual) / NROW(actual))
}
ahardisty/dstrain documentation built on May 28, 2019, 4:42 p.m.