Expensive, good afternoon
Suppose I have a vector as follows
caption
Expensive, good afternoon
Suppose I have a vector as follows
caption
You can do this by using regular expression :
library(stringr)
legenda <- c("Gostei muito da atuação" , "Gostei pouco da atuação", "Nem gostei e nem desgostei")
legenda2 <- str_replace_all(string = legenda,
pattern = "(\w+\s\w+)",
replacement ="\1 \n")
legenda2
[1] "Gostei muito \n da atuação \n" "Gostei pouco \n da atuação \n"
[3] "Nem gostei \n e nem \n desgostei"
To change the number of words just put more \w+\s