fork download
  1. yy <- c("computers arent working", "arent not wkng","scanner arent good","arent scanner good")
  2. grep("\\w\\W+arent\\W+\\w", yy, value = TRUE)
Success #stdin #stdout 0.23s 60752KB
stdin
Standard input is empty
stdout
[1] "computers arent working" "scanner arent good"