R/simple_mode.R

Defines functions Mode

# Mode Function
Mode <- function(v) {
  uniqv <- unique(v)
  uniqv[which.max(tabulate(match(v, uniqv)))]
}
TarunWuyyuru26/wlime documentation built on Jan. 12, 2020, 6:27 p.m.