在 R 中使用 AND 和 OR 布尔运算符检测字符串

Question

我有这样的文字：

text = 'I love apple, pear, grape and peach'

如果我想知道文本是否包含apple 或pear。我可以执行以下操作并且工作正常：

str_detect(text,"apple|pear")
[1] TRUE

我的问题是，如果我想使用像 (apple OR pear) AND (grape) 这样的布尔值怎么办。 无论如何我可以把它放在str_detect()。那可能吗？ 以下是不工作：

str_detect(text,"(apple|pear) & (grape)" )
[1] FALSE

我想知道这一点的原因是我想编程转换一个“布尔查询”并输入grep 或str_detect。类似：

str_detect(text, '(word1|word2) AND (word2|word3|word4) AND (word5|word6) AND .....')

AND 的数量不等......

请解决多个str_detect 的问题。

Answer 1

您可以将所有模式作为向量传递给 str_detect，并检查它们是否都是 TRUE 和 all。

patterns <- c('apple|pear', 'grape')
all(str_detect(text, patterns))

或以 R 为基数

all(sapply(patterns, grepl, x = text))

或者，您可以将模式放在列表中并使用映射，这将为 OR（或您可能希望作为列表元素放置的任何其他内容）提供更详细的输出

patterns <- list(c('apple', 'pear'), 'peach')
patterns %>% 
  map(str_detect, string = text)

# [[1]]
# [1] TRUE TRUE
# 
# [[2]]
# [1] TRUE

也可以将其写为单个正则表达式，但我认为没有理由这样做

patterns <- c('apple|pear', 'grape')
patt_combined <- paste(paste0('(?=.*', patterns, ')'), collapse = '')
str_detect(text, patt_combined)

patt_combined是

# [1] "(?=.*apple|pear)(?=.*grape)"