在 grep 中查找模式向量的匹配索引

Question

在使用grep时，有没有一种简单的方法可以找到相应的向量索引？

v=c(123,456,789,651)
pat=c(1,35,47,8)
id=grep(paste0(pat, collapse="|"), v)
v[id]
[1] 123 789 651

我想生成：

pat_id
[1] 1 4 1

这样pat[pat_id]就会给我匹配pat值。

pat[pat_id]
[1] 1 8 1

在这种情况下不能使用match()，因为字符串必须相同才能计为匹配项。

Answer 1

我们可以遍历v并使用str_detect，因为它被矢量化以查找模式是否存在于其中任何一个并直接返回索引或向量。

library(stringr)
unlist(sapply(v, function(x) which(str_detect(x, as.character(pat)))))
#[1] 1 4 1

如果最终目标是获得pat向量，我们可以直接做

unlist(sapply(v, function(x) pat[str_detect(x, as.character(pat))]))
#[1] 1 8 1