R语言如何移除数据框列名中的_character(0)冗余字符

之前的gsub()代码未生效有两个核心原因：

• 正则语法中(、)属于特殊元字符，直接书写character(0)无法匹配字面意义的括号与数字0，会被解析为正则分组规则
• 写死的匹配串对空格位置要求固定，但实际列名里冗余片段和列名主体的拼接空格存在差异（比如B列冗余片段开头为_character(0)，前面无空格），无法命中所有列的冗余内容。

替换冗余内容为空字符串 #

# 正则中\\s*匹配0个或多个任意空白，\\(、\\)转义后匹配字面量括号，兼容不同空格拼接场景
colnames(df) <- gsub(
  pattern = "\\s*_\\s*character\\(0\\)\\s*_\\s*character\\(0\\)\\s*",
  replacement = "",
  x = colnames(df)
)
# 清理列名首尾多余空格
colnames(df) <- trimws(colnames(df))

替换冗余内容为"NA" #

如果需要将冗余片段替换为NA而非空串，只需要修改replacement参数即可：

colnames(df) <- gsub(
  pattern = "\\s*_\\s*character\\(0\\)\\s*_\\s*character\\(0\\)\\s*",
  replacement = "NA",
  x = colnames(df)
)
colnames(df) <- trimws(colnames(df))

执行代码后列名会被清理为预期格式：

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