fork download
  1. string <- "abcd LastMatch РОДИНА"
  2. unlist(regmatches(string,gregexpr("(*UCP)\\b\\p{L}+\\b",string, perl=TRUE)))
  3. library(stringr)
  4. unlist(str_extract_all(string,"\\b\\p{L}+\\b"))
  5.  
Success #stdin #stdout 0.28s 42680KB
stdin
Standard input is empty
stdout
[1] "abcd"      "LastMatch" "РОДИНА"   
[1] "abcd"      "LastMatch" "РОДИНА"