我想找到名称中恰好有两个 Os 的状态。我试过这个：
> data(state)
> index=grep('o.*o',state.name)
> state.name[index]
"Colorado" "North Carolina" "North Dakota" "South Carolina" "South Dakota"
问题：“科罗拉多”中有三个操作系统，我不想要它。如何修改我的正则表达式？
我也想做三个Os：
> data(state)
> index=grep('o.*o.*o',state.name)
> state.name[index]
"Colorado"
有没有更简单的方法来做到这一点？
你可以做：
grep('^([^o]*o[^o]*){2}$', state.name, value = TRUE)
# [1] "North Carolina" "North Dakota"
# [3] "South Carolina" "South Dakota"
grep('^([^o]*o[^o]*){3}$', state.name, value = TRUE)
# [1] "Colorado"
并且正如 GSee 下面建议的那样，ignore.case = TRUE如果您想包括大写为 O 的州，如俄亥俄州、俄克拉荷马州和俄勒冈州，您可以添加。
迈克尔的回应肯定更有说服力，但这是蛮力方法：
state.name[sapply(strsplit(tolower(state.name), NULL), function(x) sum(x %in% "o") == 2)]
您应该确保您匹配的其他字符，除了两个匹配的 Os 之外，不是 Os：
grep("^[^o]*o[^o]*o[^o]*$", state.name, value = TRUE)
使用 ?gregexpr 的解决方案：有点难看，但可以很好地推广到其他正则表达式。（不要忘记俄亥俄州的大写字母 O。）
state.name[sapply(state.name,function(x) length(unlist(gregexpr("o|O",x)))) == 2]
计算状态名称中的操作系统数。
State <- c("North Dakota","Ohio","Colorado","South Dakota")
nos <- nchar(gsub("[^oO]","",State))
State[nos==2]
State[nos==3]