How do I replace the string exactly in dataset

Question

I have this vector

x<- c("Store Leader", "Produce Lead", "Stock Lead", "Assitance Leader")

I want to replace every job title with the word Lead with just "Lead"

I have been trying this without success

x2 <- gsub("\\<Lead\\>","Lead",x, ignore.case = TRUE)

The result should look like this: x<- c("Lead", "Store Leader", "Lead", "PH Leader")

Thanks

Answer 1

This works the way you want, since it seems "Lead" will always occur at the end of the string.

x<- c("Store Leader", "Produce Lead", "Stock Lead", "Assitance Leader")

x2 <- sub(".*Lead$", "Lead", x, ignore.case = TRUE)

str(x2)

chr [1:4] "Store Leader" "Lead" "Lead" "Assitance Leader"