Determine the number of occurrences of a word in an R array

Question

How would I use R to determine the number of times the word "RED" occurs in the following array:

test <- c("RED","WHITE","RED","RED")

Answer 1

Here is my answer:

sum(test == "RED")
[1] 3