eyes <- c("green", "green", "brown", "brown", "blue")
modeOf(eyes) # returns c("green", "brown") -- a tie
maxFreq(eyes) # returns 2
# with missing data
eyes <- c("green", "green", "brown", "brown", "blue", NA, NA, NA)
# na.rm = FALSE: NA is the most frequent "value"
modeOf(eyes, na.rm = FALSE)
maxFreq(eyes, na.rm = FALSE)
# na.rm = TRUE: missing values ignored
modeOf(eyes, na.rm = TRUE)
maxFreq(eyes, na.rm = TRUE)
NULL
Run the code above in your browser using DataLab