fork download
  1. x <- c("feel", "agre", "degree")
  2. rx <- "^(?:[^e]*e){2}[^e]*$"
  3. grep(rx, x, value = TRUE)
Success #stdin #stdout 0.24s 175424KB
stdin
Standard input is empty
stdout
[1] "feel"