fork download
copy 
  1. x <- c(
  2.     "The dog and the man play in the park.",
  3.     "The man plays with the dog.",
  4.     "That is the man's hat.",
  5.     "Man I love that dog!",
  6.     "I'm dog tired",
  7.     "The dog park is no place for man.",
  8.     "park next to this dog s man."
  9. )
  10.  
  11. grepl(".*park(*COMMIT)(*FAIL)|.*dog", x, ignore.case=TRUE, perl=TRUE)
Success #stdin #stdout 0.28s 22840KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
[1] FALSE  TRUE FALSE  TRUE  TRUE FALSE FALSE
https://ideone.com/iWz3ZH
(*COMMIT)
language:
R (R 3.5.2)
created:
8 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!