如何在R语言中移除数据集列名中的特殊字符？

先明确你之前代码的问题：

• mutate()是用来修改数据框行内的列数据，不是用来修改列名的，所以你引用col会报错——因为你的数据框里根本没有叫col的列。
• 正则表达式写法错误，"[.*"是无效的正则格式，[在正则里属于特殊字符，需要转义才能匹配实际的方括号。

下面是几种可行的解决办法：

方法1：用dplyr的rename_with（推荐） #

这是dplyr专门用来批量修改列名的函数，配合stringr的正则处理：

library(dplyr)
library(stringr)

# 批量清理所有列名，去掉[,1]这类后缀
training <- training %>%
  rename_with(~ str_remove_all(., "\\[,.*\\]"))

正则\\[,.*\\]会精准匹配[,1]及类似格式的后缀，直接移除。

方法2：Base R直接修改列名 #

如果不想用dplyr，直接操作colnames()更简单：

library(stringr)

colnames(training) <- str_remove_all(colnames(training), "\\[,.*\\]")

方法3：更简化的截断方式 #

如果你确定要去掉的是[及之后的所有内容，还可以直接按[截断字符串：

library(stringr)

colnames(training) <- word(colnames(training), 1, sep = "\\[")

这个方法不需要复杂正则，直接取[前面的部分作为新列名。

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