Find the typical value

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.

Usage

typical(x, ...)

Arguments

x

A vector

...

Arguments used by methods

Examples

# median of numeric vector
typical(rpois(100, lambda = 10))
#> [1] 10

# 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"