R/grep_not_and.R

grep_not_and <- function (x, patterns) {
    lp = lapply(patterns, function(i) grepl(i, x))
    res = 0
    for (i in lp) res = res + i
    x[res != length(patterns)]
}
yikeshu0611/do documentation built on Aug. 5, 2021, 4:17 p.m.