This is a faster and more concise equivalent of length(unique(x))
length(unique(x))
n_distinct(x, na_rm = FALSE)
x
a vector of values
na_rm
if TRUE missing values don't count
TRUE
x <- sample(1:10, 1e5, rep = TRUE) length(unique(x)) n_distinct(x)