For numeric, integer, and ordered factor vectors, it returns the median. For factors, characters, and logical vectors, it returns the most frequent value. If multiple values are tied for most frequent, it returns them all. NA missing values are always silently dropped.

typical(x, ...)

Arguments

x

A vector

...

Arguments used by methods

Examples

# median of numeric vector typical(rpois(100, lambda = 10))
#> [1] 9
# most frequent value of character or factor x <- sample(c("a", "b", "c"), 100, prob = c(0.6, 0.2, 0.2), replace = TRUE) typical(x)
#> [1] "a"
typical(factor(x))
#> [1] "a"
# if tied, returns them all x <- c("a", "a", "b", "b", "c") typical(x)
#> [1] "a" "b"
# median of an ordered factor typical(ordered(c("a", "a", "b", "c", "d")))
#> [1] "b"