R语言data frame列重命名问题：循环迭代后缀未按列对应分配

你遇到的问题很典型——你的循环每次都把所有10列（18-27）的名字全部替换成当前inv值对应的后缀，循环执行10次后，最后一次inv=10的赋值会覆盖前面所有的结果，所以所有列都变成了后缀10。

这里有两种简单的解决方法：

方法1：直接向量赋值（推荐，最简洁） #

不用循环，直接生成对应10列的完整列名，一次性赋值给目标列索引：

colnames(data)[18:27] <- paste("expA_mult4_belA4", 1:10, sep = "_")

paste()函数会自动把向量1:10和前缀一一拼接，生成10个不同的列名，正好对应18到27列的位置，一步到位。

方法2：修正循环逻辑（如果一定要用循环） #

如果坚持用循环，需要每次只修改单个列，而不是全部10列。目标列的索引是17 + inv（因为inv从1到10时，17+1=18，17+10=27）：

for(inv in 1:10){
  colnames(data)[17 + inv] <- paste("expA_mult4_belA4", inv, sep = "_")
}

这样每次循环只会修改对应位置的列名，不会覆盖之前的结果。

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