SihSi x es tu vector, entonces:
x <- c(1,1,2,3,4)
unique(x)
Si es un data frame:
df <- data.frame(a = c(1,1,2,3,4))
unique(df$a)
Si tus datos están agrupados por días (te recomiendo que cuando preguntes pongas tu código o bien un ejemplo de tus datos) puedes agruparlos y contar etiquetas diferentes en cada:
library(tidyverse)
df <- data.frame(días = c("lunes", "lunes", "martes", "miércoles"),
vehículo = c("a", "a", "b", "c"))
df %>% group_by(días) %>% count(vehículo)