regex to replace words with more than two consecutive characters

Question

How can I detect the presence of more than two consecutive characters in a word and remove that word?

I seem to be able to do it like this:

# example         


        

Answer 1

Combine the expressions like so:

gsub("^[[:alpha:]]*([[:alpha:]])\\1\\1[[:alpha:]]*$", "", mystring)