将列表转换为数据帧，并加入另一个数据帧

Question

我想将一个包含44928行的列表转换为数据帧，然后合并到另一个具有相同行数的数据帧中（44928）。

此列表位于已转换的json响应中：

因此，我想将此列表转换为数据帧：

Data[["Axes"]][["Tuples"]][[1]]


      Ordinal                                                                      Members
1           0             2017, Orcamento, Faturamento, Total, Total das Áreas de Negócios
2           1                                2017, Orcamento, Faturamento, Total, Software
3           2                                   2017, Orcamento, Faturamento, Total, Hélio
4           3                                  2017, Orcamento, Faturamento, Total, Daniel
5           4                                    2017, Orcamento, Faturamento, Total, Soja
6           5                               2017, Orcamento, Faturamento, Total, São Paulo
7           6                                2017, Orcamento, Faturamento, Total, Campinas
8           7                                  2017, Orcamento, Faturamento, Total, Cuiabá
9           8                            2017, Orcamento, Faturamento, Total, Monte Alegre
 [44928 rows ]

然后我想加入这个数据框：

Data[["Cells"]][["Value"]]

Value
285174806
2
63776432
3
33220232
4
30556200
5
59531944
6
42022921
7
NA
8
NA
9
NA
10
NA
11
17509023
12
NA
13
NA
14
64537200
5
32850380
[44928 rows ]

一个数据框，将＆＃34;成员＆＃34;的每个元素列表分开。按列，然后加入＆＃34;值＆＃34;数据帧。

Answer 1

解决了

c <- as.data.frame(Data[["Cells"]][["Value"]])
b <- as.data.frame(t(apply(Data[["Axes"]][["Tuples"]][[1]], 1, unlist)))
D <- cbind(b, c)