我使用 grepl 来检查字符串是否包含一组模式中的任何模式（我使用 '|' 来分隔模式）。反向搜索没有帮助。如何识别匹配的模式集？
附加信息：这可以通过编写一个循环来解决，但它非常耗时，因为我的集合有 > 100,000 个字符串。可以优化吗？
例如：让字符串为a <- "Hello"
pattern <- c("ll", "lo", "hl")
pattern1 <- paste(pattern, collapse="|") # "ll|lo|hl"
grepl(a, pattern=pattern1) # returns TRUE
grepl(pattern, pattern=a) # returns FALSE 'n' times - n is 3 here
您正在str_detect从包中寻找stringr：
library(stringr)
str_detect(a, pattern)
#[1] TRUE TRUE FALSE
如果你有多个字符串，a = c('hello','hola','plouf')你可以这样做：
lapply(a, function(u) pattern[str_detect(u, pattern)])
您还可以将基数 R 与前瞻表达式一起使用(?=)，因为模式重叠。您可以将gregexpr每个分组模式的匹配位置提取为矩阵。
## changed your string so the second pattern matches twice
a <- "Hellolo"
pattern <- c("ll", "lo", "hl")
pattern1 <- sprintf("(?=(%s))", paste(pattern, collapse=")|(")) # "(?=(ll)|(lo)|(hl))"
attr(gregexpr(pattern1, a, perl=T)[[1]], "capture.start")
# [1,] 3 0 0
# [2,] 0 4 0
# [3,] 0 6 0
矩阵的每一列对应于模式，因此模式 2 匹配测试字符串中的位置 4 和 6，模式 1 匹配位置 3，依此类推。