Question

我有一个列表列表，我想将其转换为数据帧。挑战在于列表中缺少变量名称（不是NA＆＃39;但变量完全丢失）。

举例说明：来自

my_list <- list() 
my_list[[1]] <- list(a = 1, b = 2, c = 3)
my_list[[2]] <- list(a = 4, c = 6)

我想得到

     a  b c
[1,] 1  2 3
[2,] 4 NA 6

Answer 1

另一种选择是

library(reshape2)
as.data.frame(acast(melt(my_list), L1~L2, value.var='value'))
#  a  b c
#1 1  2 3
#2 4 NA 6

或者@David Arenburg建议melt/dcast的包装器为recast

recast(my_list, L1 ~ L2, value.var = 'value')[, -1]
#  a  b c
#1 1  2 3
#2 4 NA 6

Answer 2

您可以使用bind_rows包中的dplyr功能：

my_list <- list() 
my_list[[1]] <- list(a = 1, b = 2, c = 3)
my_list[[2]] <- list(a = 4, c = 6)
dplyr::bind_rows(lapply(my_list, as.data.frame))

输出：

Source: local data frame [2 x 3]
  a  b c
1 1  2 3
2 4 NA 6

Answer 3

另一个答案是，这需要将参数类更改为data.frames：

 library(plyr)
 lista <- list(a=1, b=2, c =3)
 listb <- list(a=4, c=6)
 lista <- as.data.frame(lista)
 listb <- as.data.frame(listb)
 my_list <- list(lista, listb)
 my_list <- do.call(rbind.fill, my_list)
 my_list
   a  b c
 1 1  2 3
 2 4 NA 6

将R中的列表放入data.frame中 - 变量名称不一致

3 个答案: