R 中如何将包含矩阵列表列的 data.frame 展开为普通数据框？

2026-11-04数据小许

可以用 do.call(rbind, df$x) 将 x 列中的矩阵按行合并，再用 as.data.frame() 转成普通数据框：

result <- as.data.frame(do.call(rbind, df$x))

对于给出的数据，结果应为 35 行、2 列，列名保留为 Consumption 和 Income。

为什么原来的数据不方便直接访问？

df 已经是一个 data.frame，但它只有一个名为 x 的列表列。x 包含 7 个元素，每个元素都是一个 5×2 矩阵，因此外层数据框的每一行对应一个完整矩阵。

可以用下面的代码查看嵌套结构：

str(df)
str(df$x[[1]])

仅执行 as.data.frame(df) 不会展开内部矩阵，需要先合并 df$x 中的矩阵。

展开后如何访问数据？

do.call() 将列表中的矩阵分别作为参数传给 rbind()，按列表顺序纵向拼接。转换后，可以像访问普通数据框一样访问列和索引行列：

result <- as.data.frame(do.call(rbind, df$x))

# 查看结果的行数、列数和前几行
 dim(result)
head(result)

# 获取完整的一列
result$Consumption
result$Income

# 获取第 1 行的 Consumption 值
result[1, "Consumption"]

原来第一个矩阵的 5 行对应 result 的第 1～5 行，第二个矩阵对应第 6～10 行，以此类推。

保留原结构时如何访问元素？

如果只需要读取某个矩阵中的数值，可以用 [[ ]] 取出矩阵，再通过矩阵索引访问：

# 取出第一个矩阵
m <- df$x[[1]]

# 获取该矩阵第 1 行的 Consumption 值
m[1, "Consumption"]

# 也可以直接连续索引
df$x[[1]][1, "Consumption"]

# 获取第二个矩阵的整列 Income
df$x[[2]][, "Income"]

df$x[1] 返回一个只含该元素的 list，df$x[[1]] 则取出其中的矩阵。要访问矩阵内部的行列，应先用 [[ ]] 取出矩阵。

合并时需要注意什么？

上述合并方式适用于给出的数据：所有矩阵都是数值矩阵，列数相同，列名和列顺序也一致。如果换成其他数据，应先确认这些条件。矩阵的 rbind() 按列位置拼接，不应依赖它自动按列名重新排列数据。

如果后续需要知道每一行来自哪个原始矩阵，可以在合并时加上来源编号：

result_with_id <- do.call(rbind, lapply(seq_along(df$x), function(i) {
  data.frame(
    source_id = i,
    as.data.frame(df$x[[i]])
  )
}))

source_id 对应 df$x 中的元素位置，方便展开后按原始矩阵分组处理。