list - 将列表矩阵转换为正则矩阵

Question

取以下代码:

foo <- list()
foo[[1]] <- list(a=1, b=2)
foo[[2]] <- list(a=11, b=22)
foo[[3]] <- list(a=111, b=222)
result <- do.call(rbind, foo)
result[,'a']

在这种情况下， result[,'a']显示一个列表。有没有更优雅的方式，例如 result是向量的“常规”矩阵吗？我想有一些手动方法可以解决这个问题，但我想知道我是否遗漏了一个明显的步骤。

Answer 1

do.call 列表非常优雅，而且速度很快。事实上 do.call(rbind, my.list) 曾经在我需要组合一个巨大的列表时救了我的屁股。这是迄今为止最快的解决方案。

为了解决您的问题，可能是这样的:

do.call(rbind, lapply(foo, unlist))


> result.2 <- do.call(rbind, lapply(foo, unlist))
> result.2
       a   b
[1,]   1   2
[2,]  11  22
[3,] 111 222
> result.2[, 'a']
[1]   1  11 111
>