如何将列表列表转换为列表数组？

Question

我在R中有一个列表列表。我想将它转换为列表数组，但我只得到一个列表列表数组：

r <- list(list(a=1, b=NULL, c=NULL, d=1.23),
          list(a=2, b=NULL, c=NULL, d=3.32),
          list(a=3, b=NULL, c=NULL, d=2.13),
          list(a=4, b=NULL, c=NULL, d=3.25),
          list(a=5, b=NULL, c=NULL, d=0.14),
          list(a=6, b=NULL, c=NULL, d=5.13))
x <- array(r, dim=c(3,2))
x[1,1] # now a list of length 1 containing an element which is a list with components a--d

如您所见， x[1,1] （例如）现在是列表列表，但“外部”列表是无用的。 我宁愿有一个数组y ， y[i,j]是x[i,j][[1]] 。 获得此功能的最佳方式是什么（使用base-R中的函数（无附加软件包））？

我试图使用一些unlist() hackery像array(unlist(r, recursive=FALSE), dim=c(3,2)) ，但是失败了。 sapply(r, FUN=I)至少给出一个矩阵......也许这有助于（？）

Answer 1

使用双括号， x[[1,1]] 。

Answer 2

按设计你不能这样做。

矢量元素是定义长度为1的向量，而数组/矩阵仍然是具有维度的向量。

列表本身是通用向量，因此它们可以是其他列表（或数组或矩阵）的元素，但前提是它们本身的长度为1。

顺便说一下，这就是为什么使用[]选择列表中包含的对象只返回包含对象的大小为1的列表，而不是使用[[]]需要获取的实际对象。

所以答案是，真的没有办法摆脱“外部”清单。

有关详细信息，请参阅R语言定义手册。