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

r6l8ljro  于 2023-11-14  发布在  其他
关注(0)|答案(3)|浏览(146)

我想使用filter()和str_detect()匹配多个模式,而不需要多次调用str_detect()函数来过滤一个字符串。在下面的例子中,我想过滤字符串df,只显示包含字母afo的行。

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))中:较长的对象长度不是较短对象长度的倍数

slwdgvem

slwdgvem1#

使用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

字符串

cuxqih21

cuxqih212#

这可能用“&”而不是“|“(对不起,没有足够的代表发表评论)

5lhxktic

5lhxktic3#

为了更进一步地综合接受的答案,还可以定义一个具有感兴趣的搜索模式的向量,并使用其collapse参数将这些向量与paste连接起来,其中搜索标准“”或“”定义为'|',搜索标准“”和“”定义为'&'
例如,当搜索模式在脚本中的其他地方自动生成或从源读取时,这可能很有用。

#' Changing the column name of the letters column to `lttrs`
#' to avoid confusion with the built-in vector `letters`
df <- data.frame(numbers = 1:52, lttrs = letters)

search_vec <- c('a','f','o')
df %>% 
    filter(str_detect(lttrs, pattern = paste(search_vec, collapse = '|')))

#  numbers letters
#1       1       a
#2       6       f
#3      15       o
#4      27       a
#5      32       f
#6      41       o

字符串

相关问题