R语言中如何将列名从「年份+标识」格式转换为「标识+年份」格式

原代码失效原因 #

你原有代码无法生效的核心问题有两个：

• 正则匹配规则错误：\W用于匹配非单词字符，而你的列名全由数字、字母这类单词字符组成，完全无法匹配到目标内容
• R的正则语法要求用双反斜杠做转义符，你写的单反斜杠不会被识别为正则元字符的转义标记

正确实现代码 #

方法1（精准匹配，不会误改其他列） #

适配你当前「4位年份+sum」的列名格式，仅修改符合规则的列：

colnames(dataframe) <- gsub("(\\d{4})(sum)", "\\2\\1", colnames(dataframe))

方法2（通用适配） #

如果后缀不是固定的sum，是其他任意字母组合也可以使用：

colnames(dataframe) <- gsub("(\\d+)([a-zA-Z]+)", "\\2\\1", colnames(dataframe))

实现逻辑 #

• 用第一组捕获规则(\\d{4})/(\\d+)匹配列名前缀的数字年份部分
• 用第二组捕获规则(sum)/([a-zA-Z]+)匹配列名后缀的字母部分
• 替换规则\\2\\1会将第二组内容放在前面、第一组内容放在后面，正好实现你要的sum+年份的列名格式

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