R：将列表数据转换为数据框

Question

我有从ODK聚合创建的JSON文件生成的列表数据。它看起来是这样的：

P1 <- list(a01 = 1:11, a02 = letters[1:11], a03 = list(letters), a04 = (1:11)^2) 

我想什么做的基本上是通过丢弃任何嵌套表（a03）转换P1成数据帧。有了这个简单的例子，我们将得到以下作为我们的最终输出。

P1data <- data.frame(a01 = 1:11, a02 = letters[1:11], a04 = (1:11)^2) 

感谢您的帮助，您可以提供任何帮助！

Answer 1

试试这个

as.data.frame(Filter(Negate(is.list), P1)) 
# a01 a02 a04 
# 1 1 a 1 
# 2 2 b 4 
# 3 3 c 9 
# 4 4 d 16 
# 5 5 e 25 
# 6 6 f 36 
# 7 7 g 49 
# 8 8 h 64 
# 9 9 i 81 
# 10 10 j 100 
# 11 11 k 121