R/getmode.R

# getmode
#
#
getmode <- function(values) {
    uniqValues <- unique(values)
    uniqValues[which.max(tabulate(match(values, uniqValues)))]
}
mmiche/esmprep documentation built on July 7, 2019, 8:23 p.m.