hSi x es tu vector, entonces:

```{r}
x <- c(1,1,2,3,4)
unique(x)
```
Si es un data frame:

```r
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: 

```{r}
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)
```