如何用R语言sub函数替换括号前的数字以得到目标结果？

你的问题出在正则表达式写法错误，原正则"*.\\(*."不符合正则语法规则，导致匹配结果不符合预期。要实现替换括号前的数字为foo，可以用以下两种方式修改：

方法一：匹配开头的所有数字 #

直接匹配字符串开头的连续数字，替换为foo：

string <- "1234556 (789)"
sub("^\\d+", "foo", string)
# 输出结果：[1] "foo (789)"

解释：^\\d+表示匹配字符串开头的1个或多个数字（\\d匹配数字，+表示至少出现一次，^限定开头位置）。

方法二：精准匹配括号前的数字（包含空格） #

如果需要确保替换的是紧跟括号前的数字（包含中间的空格），可以用更精准的正则：

string <- "1234556 (789)"
sub("^\\d+\\s", "foo ", string)
# 输出结果：[1] "foo (789)"

解释：^\\d+\\s匹配开头的连续数字，加上后面的空格（\\s匹配空白字符），替换为foo ，保证空格保留，结果和预期一致。

原正则的错误点 #

• *是正则中的量词，必须跟在某个匹配元素后面（比如a*表示0个或多个a），不能单独使用*.；
• \\(*表示0个或多个左括号，这和你要匹配数字的需求完全不符，导致匹配错误。

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