दी गई लंबाई के ऊपर स्ट्रिंग में सभी शब्दों को कैसे ट्रिम करें?

Question

उदाहरण के लिए इस लंबाई 3 या उससे अधिक के हर शब्द से मेल खाता है, और xx साथ यह बदल देता है:

library(stringr) 
str_replace_all(c("This is a long", "Another one."), "([a-zA-Z]{3,})", "xx") 
#output: "xx is a xx" "xx xx" 

मैं पाने के लिए क्या करना चाहते हैं:

#"Thi is a lon" "Ano one." 

Answer 1

आप मैच के लिए निम्नलिखित का उपयोग कर सकते :

([a-zA-Z]{3})[a-zA-Z]+ 

और \\1

के साथ बदलें 10

तुम भी gsub (टिप्पणियों से)

gsub("([a-zA-Z]{3})[a-zA-Z]+", "\\1", c("This is a long", "Another one."))