如何删除R数据框中部分指定列的列名前缀，其余列保持不变

你可以根据你的使用场景选择基础R或tidyverse体系的实现方案：

基础R实现 #

无需加载额外依赖，直接操作列名字符串即可：

# 定义需要移除前缀的目标列
target_cols <- c("ATH_V1", "ATH_V6")
# 匹配目标列后替换前缀
colnames(df)[colnames(df) %in% target_cols] <- sub("^ATH_", "", colnames(df)[colnames(df) %in% target_cols])

其中正则表达式^ATH_仅匹配列名开头的前缀字符串，不会误替换列名中间出现的对应字符。

dplyr（tidyverse）实现 #

如果你习惯使用tidyverse语法，可以用rename_with函数批量处理指定列：

library(dplyr)

df <- df %>%
  rename_with(
    .fn = ~ sub("^ATH_", "", .x),
    .cols = c(ATH_V1, ATH_V6)
  )

两种方案执行后，数据框的列名将变为V1、ATH_V2、ATH_V3、ATH_V4、ATH_V5、V6、ATH_V7，符合修改需求。

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