Мне нравится делать это в качестве справочной таблицы. Вы можете использовать приемлемые имена в качестве names записей и просто искать их. Если имени нет в списке, в результате вы получите NA. Пример:
FishingGround = c("Lobster Bay", "Deep Cove", "Whale Head")
AcceptableNames = c("Lobster Bay", "Lobster Claw",
"Deep Cove", "Shallow Cove", "Whale Tail")
names(AcceptableNames) = AcceptableNames
AcceptableNames[FishingGround]
Lobster Bay Deep Cove <NA>
"Lobster Bay" "Deep Cove" NA
NA соответствуют недопустимым записям
## Unacceptable names
FishingGround[which(is.na(AcceptableNames[FishingGround]))]
[1] "Whale Head"
## Acceptable names
FishingGround[which(!is.na(AcceptableNames[FishingGround]))]
[1] "Lobster Bay" "Deep Cove"