a <- c("abcxyz", "abcdef", "defxyz", "abcdefxyz", "xyzdefabc")grep("^(?=.*abc)(?=.*xyz)", a, ignore.case=TRUE, perl=TRUE)
Standard input is empty
[1] 1 4 5
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!