r - 使用 filter() 和 str_detect() 按多个模式过滤

Question

我想使用 filter() 和 str_detect() 匹配多个模式来过滤数据帧，而不需要多个 str_detect() 函数调用。在下面的示例中，我想过滤数据框df以仅显示包含字母a f和的行o。

df <- data.frame(numbers = 1:52, letters = letters)
df %>%
    filter(
        str_detect(.$letters, "a")|
        str_detect(.$letters, "f")| 
        str_detect(.$letters, "o")
    )
#  numbers letters
#1       1       a
#2       6       f
#3      15       o
#4      27       a
#5      32       f
#6      41       o

我尝试了以下

df %>%
    filter(
        str_detect(.$letters, c("a", "f", "o"))
     )
#  numbers letters
#1       1       a
#2      15       o
#3      32       f

并收到以下错误

警告消息：在 stri_detect_regex(string, pattern, opts_regex = opts(pattern)) 中：较长的对象长度不是较短对象长度的倍数

Answer 1

使用 filter() 和 str_detect() 完成此操作的正确语法是

df %>%
  filter(
      str_detect(letters, "a|f|o")
  )
#  numbers letters
#1       1       a
#2       6       f
#3      15       o
#4      27       a
#5      32       f
#6      41       o