是否有更简单的方法来匹配正则表达式模式的整体？例如，要检查给定字符串是否大写，以下2种方法似乎太复杂。检查stringr我也没有发现更简单的解决方案。

方法一：

isUpperMethod1 <- function(s) {
  return (all(grepl("[[:upper:]]", strsplit(s, "")[[1]])))
}

字符串

方法二：

isUpperMethod2 <- function(s) {
  m = regexpr("[[:upper:]]+", s)
  return (regmatches(s, m) == s)
}

型
我故意省略了对空、NA、NULL字符串的处理，以避免代码臃肿。

大写模式可以推广到任意正则表达式模式（或字符集）。

我看不出以上两种解决方案有什么问题，只是它们对于解决的问题来说似乎过于复杂。