yy <- c("computers arent working", "arent not wkng","scanner arent good","arent scanner good")grep("\\w\\W+arent\\W+\\w", yy, value = TRUE)
Standard input is empty
[1] "computers arent working" "scanner arent good"
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!