AGREP中的R - 找到*所有*的字符串（全局標誌）比賽

Question

我有一個字符串：

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

和模式

pattern <- "(egs|ham)" 

我想知道有多少次pattern匹配string模糊匹配（agrep）。

gregexpr會爲正常匹配做到這一點 - 我只是想知道R中是否存在相應的garegexpr或者如何在不太重視性能的情況下模擬它。

（aregexec將只返回第一個匹配的索引，「雞蛋」，並跳過「火腿」）。

Answer 1

你沒有指定你需要base 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包。充滿各種字符串的用處。