R语言使用正则表达式给字符串单数字前补0，语法错误如何修正？

正确代码 #

直接使用以下正则写法即可实现需求：

Batch <- c("batch1", "batch2", "batch3", "batch10", "batch11")
# 正则写法
Batch <- gsub("(batch)(\\d)(?!\\d)", "\\10\\2", Batch, perl = TRUE)

如果需要更通用的、不依赖前缀固定的写法，推荐使用字符串填充方案，稳定性更高：

library(stringr)
# 提取末尾数字，补0到2位后拼接前缀
num_part <- str_extract(Batch, "\\d+$")
Batch <- paste0("batch", str_pad(num_part, width = 2, side = "left", pad = "0"))

两种写法运行后都可以得到预期结果：batch01, batch02, batch03, batch10, batch11

原有写法的错误说明 #

• 核心问题是你写的\10\2会被R的正则解析器识别为「第10个捕获组 + 第2个捕获组」，而非你预期的「第1个捕获组 + 字符0 + 第2个捕获组」，这是输出出现多余0的主要原因。
• 第二是正则语法适配问题：R的基础正则不默认支持单词边界、零宽断言等特性，你需要加perl = TRUE参数启用PCRE正则规则，同时转义符需要写双反斜杠\\才能被识别。
• 第三是固定长度匹配(.{5})的写法灵活性极差，前缀只要有变化就会匹配错误，不推荐使用。

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