R中的agrep - 在字符串中查找* all *匹配（全局标志）

Question

我有一个字符串：

string <- "I do not like green eggs and ham!"

和模式

pattern <- "(egs|ham)"

我想知道pattern匹配string与模糊匹配（agrep）的次数。

gregexpr会针对正常匹配执行此操作 - 我只是想知道R中是否存在相应的garegexpr或者是否可以模拟它而不会过于沉重的表现。

（aregexec只返回第一场比赛的索引，“蛋”，并跳过“火腿”。）

Answer 1

你没有指定你需要基数R，所以我很乐意建议使用Hadley Wickham的“stringr”包中的str_count（string，pattern）函数。

library(stringr)
string <- "I do not like green eggs and ham!"
pattern <- "(egs|ham)"
str_count(string, pattern)
[1] 1

stringr真的是一个很棒的R包。充满各种字符串的用处。