在base R中检查字符串是否仅包含允许的字符

可以通过正则表达式结合grepl()函数实现，这是Base R里最直接的方案：

核心思路 #

构建精准的匹配规则：只匹配由大小写字母、数字，以及+、-、$组成的字符串。正则模式各部分作用：

• ^ 匹配字符串起始位置
• [a-zA-Z0-9\\+\\-\\$] 定义允许的字符集合：a-zA-Z0-9覆盖所有字母数字，\\+、\\-、\\$转义正则特殊符号，避免解析歧义
• + 表示匹配前面的字符至少一次（确保字符串非空）
• $ 匹配字符串结束位置

实现代码 #

# 定义检查函数
check_valid_chars <- function(str) {
  grepl("^[a-zA-Z0-9\\+\\-\\$]+$", str)
}

# 测试示例
check_valid_chars("Avb@")  # 返回 FALSE（包含不允许的@）
check_valid_chars("dn$")   # 返回 TRUE（仅包含允许的字符）
check_valid_chars("a1+")   # 返回 TRUE
check_valid_chars("b-c")   # 返回 TRUE
check_valid_chars("_xyz")  # 返回 FALSE（下划线不在允许列表）

补充说明 #

如果需要允许空字符串，只需把正则中的+替换为*（表示匹配0次或多次），修改后的模式为：^[a-zA-Z0-9\\+\\-\\$]*$

内容的提问来源于stack exchange，提问作者tzema