regex - how to remove words of specific length in a string in R?

Question

I want to remove words of length less than 3 in a string. for example my input is

str<- c("hello RP have a nice day")

I want my output to be

str<- c("hello have nice day")

Please help

Answer 1

Try this:

gsub('\b\w{1,2}\b','',str)
[1] "hello  have  nice day"

EDIT is word boundary. If need to drop extra space,change it as:

gsub('\b\w{1,2}\s','',str)

Or

gsub('(?<=\s)(\w{1,2}\s)','',str,perl=T)