如何在R语言中将列名转为第一行并统一列名为var1、var2等？

可以通过以下几步实现需求，代码简洁且适配任意列数的数据框，方便后续行绑定：

代码实现 #

# 示例数据
q = structure(list(shootings_per100k = c(8105.47466098618, 6925.42653239307
), lawtotal = c(3.00137104283906, 0.903522788541896), felony = c(0.787418655097614, 
0.409578330883717)), row.names = c("mean", "sd"), class = "data.frame")

# 1. 提取原列名作为新行，行名设为"var"
new_row <- data.frame(t(colnames(q)), row.names = "var")

# 2. 给原数据框设置统一列名var1、var2...
colnames(q) <- paste0("var", seq_along(q))

# 3. 合并新行与原数据框，将新行放在顶部
result <- rbind(new_row, q)

运行结果 #

执行后result的输出与期望格式一致：

> result
                  var1      var2      var3
var  shootings_per100k  lawtotal    felony
mean          8105.475 3.0013710 0.7874187
sd            6925.427 0.9035228 0.4095783

适配说明 #

• 不管数据框有多少列，paste0("var", seq_along(q))都会自动生成对应数量的统一列名
• 处理后的所有数据框结构一致，直接用rbind()或dplyr::bind_rows()即可完成行绑定

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