R语言如何仅移除数据集内字符串末尾的指定后缀/1

原有字符串后缀移除写法sub("/1","",x)未加位置约束，会匹配字符串中最先出现的/1片段，误改字符串前部的内容，无法满足仅删除末尾后缀的需求。

正则表达式中$符号代表字符串结束位置，只需要给匹配的目标后缀加上这个末尾锚点，就能精准定位到字符串末尾的/1，不会影响字符串其他位置的同内容片段。

实现代码 #

# 构造示例数据集
zz <- data.frame(a = c(1,2,3,4),
                 b = c("JTI18A/123456","JTI19A/123456","JTI19A/123456/1","JTI18A/123456"))

# 仅移除末尾的/1后缀
zz$b <- sub("/1$", "", zz$b)

处理效果 #

执行上述代码后，zz$b列的取值完全符合预期：

• 第1行：JTI18A/123456，无改动，末尾无目标后缀
• 第2行：JTI19A/123456，无改动，末尾无目标后缀
• 第3行：JTI19A/123456，仅末尾的/1被移除，字符串前部内容未被修改
• 第4行：JTI18A/123456，无改动，末尾无目标后缀

补充提示 #

• 如果待处理字符串可能存在末尾多余空格的情况，可以将匹配模式调整为"/1\\s*$"，兼容末尾带空白字符的场景，避免漏匹配。
• 单个字符串仅存在一个结束位置，使用sub()即可完成替换，无需调用gsub()。

内容的提问来源于stack exchange，提问作者sam.mulholland