如何在RStudio中基于data.frame列表构建指定结构的表格

核心思路 #

由于所有data.frame的xm...µm列取值完全一致，我们可以直接提取每个data.frame的Sphericity.1列，将其作为目标表格的行，再用列表名称和xm...µm取值分别设置行名和列名。

操作步骤及代码 #

1. （可选）验证数据一致性
   先确认所有data.frame的xm...µm列完全相同，避免后续列名匹配出错：

   # 假设你的数据列表名为df_list
   all_same_xm <- all(sapply(df_list, function(x) identical(x$`xm...µm`, df_list[[1]]$`xm...µm`)))
   if (!all_same_xm) stop("部分data.frame的xm...µm列不一致，请检查原始数据")
   

2. 构建目标表格
   提取每个data.frame的Sphericity.1并组合，同时设置行、列名：

   # 提取Sphericity.1并按行组合
   target_table <- do.call(rbind, lapply(df_list, function(x) x$Sphericity.1))
   # 设置行名为原列表中各data.frame的名称
   rownames(target_table) <- names(df_list)
   # 设置列名为xm...µm的取值（取第一个data.frame的列即可）
   colnames(target_table) <- df_list[[1]]$`xm...µm`
   # 转换为data.frame格式（按需选择）
   target_table <- as.data.frame(target_table)
   

执行完上述代码后，target_table就是你需要的51行×100列的表格：行对应每个data.frame的名称，列对应xm...µm的类别，单元格值为对应data.frame的Sphericity.1数据。

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