This is a faster and more concise equivalent of length(unique(x))

length(unique(x))

n_distinct(..., na.rm = FALSE)

vectors of values

id TRUE missing values don't count

TRUE

x <- sample(1:10, 1e5, rep = TRUE) length(unique(x))#> [1] 10n_distinct(x)#> [1] 10