R语言合并数据时能否直接设置列名？现有尝试未成功求方法

以下几种方式可以让你在合并数据时直接指定列名，无需后续单独修改：

方法1：利用命名列表直接转换 #

先创建带有列名的命名列表，再转为data.frame，列名会自动保留：

data <- iris
# 创建包含列名的命名列表，每个元素对应一个物种的统计结果
summary_list <- list(
  setosa = summary(data[data$Species=='setosa', 1]),
  versicolor = summary(data[data$Species == 'versicolor', 1]),
  virginica = summary(data[data$Species == 'virginica', 1])
)
# 直接将命名列表转为data.frame，列名自动生效
result <- data.frame(summary_list)
result

方法2：用dplyr+tidyr分组统计并转宽格式 #

这种方法更简洁，适合批量处理，无需手动提取分组数据：

library(dplyr)
library(tidyr)

result <- iris %>%
  # 按Species分组
  group_by(Species) %>%
  # 对Sepal.Length列做summary统计
  summarise(across(Sepal.Length, summary)) %>%
  # 转换为宽格式，自动用Species值作为列名
  pivot_wider(names_from = Species, values_from = starts_with("Sepal.Length"))

result

方法3：直接在data.frame中指定列名 #

在构建data.frame时，给每个统计结果直接赋值列名：

data <- iris
a <- data[data$Species=='setosa', 1]
b <- data[data$Species == 'versicolor', 1]
c <- data[data$Species == 'virginica', 1]

# 构建data.frame时直接指定每一列的名称
result <- data.frame(
  setosa = as.matrix(summary(a)),
  versicolor = as.matrix(summary(b)),
  virginica = as.matrix(summary(c))
)
result

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