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()这样的array(unlist(r, recursive=FALSE), dim=c(3,2)) hackery，但是失败了。 sapply(r, FUN=I)至少给出一个矩阵......也许这有助于（？）

Answer 1

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

Answer 2

按设计你不能这样做。

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

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

BTW这就是为什么使用[]选择列表中包含的对象只返回包含对象的大小为1的列表，而不是使用[[]]得到的实际对象。

所以答案是，实际上没有办法摆脱“外部”名单。

有关详细信息，请参阅R Language Definition手册。

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

2 个答案: