匹配多個模式，返回多個子字符串

Question

假設我有一個向量搜索字符串，以及一個可能包含多個匹配項的目標字符串。 例如顏色：

search_strings <- c("Black","Grey","Green")
target_string <- "FooBlackBlahGreenBleh"

獲取向量（“ Black”，“ Green”）作為輸出的最有效方法是什么？ 即，在目標字符串中的搜索字符串子集的向量？

Answer 1

我們可以使用Vectorize來矢量化grepl ：

search_strings[Vectorize(grepl)(search_strings,target_string)]
# [1] "Black" "Green"

Answer 2

我們還可以使用可以采用向量的str_match 。 我們作為輸出獲得的vector具有不匹配的NA，我們將其用is.na刪除

library(stringr)
v1 <- str_match(target_string, search_strings)[,1]
v1
#[1] "Black" NA      "Green"
v1[!is.na(v1)]
#[1] "Black" "Green"