R中的部分字符串匹配，除了使用grep

Question

我需要做部分字符串匹配R：

eg: str1<-"here we go"
    str2<-"here we go another way"

我需要做类似 grep(str1,str2) 的事情，即输出应返回 str1 是否在 str2 中。一种方法是 grep 但 grep 运行速度非常慢。如何以更快的方式完成这项工作？

谢谢

Answer 1

例如使用grepl。这里有一个包装函数：

str1 <- "here we go"
str2 <- "here we go another way"

`%instr%` <- 
  function(s1,s2) grepl(s1,s2) || grepl(s2,s1)

str1 %instr% str2
## [1] TRUE