Let's say I have an R vector of type `character`:

```
vector1 = c("dog", "cat", "fish")
vector2 = c("fish", "fish", "fish")

```

The first vector `vector1` contains three distinct elements: dog, cat, fish

However, `vector2` contains all the same elements. 

I'm looking for an efficient way to check this property in an R vector, preferably using base R.

My idea would be to use the following:

Check `length(unique(vector1))==1`. If `TRUE`, then there's only 1 element. If `FALSE`, there are many.