如何读取嵌套的JSON文件并将其写入R中的excel文件

Question

我正在尝试读取此JSON文件： https://pastebin.com/Xh5TDu12 这不是整个JSON文件，因为原始文件的长度超过10.000 loc，但是结构始终相同。

我想将其存储在数据框中，然后以表格的形式将其写入.csv或.xls文件。

我刚刚开始使用R，所以我不知道很多技巧可以解决这个问题。到目前为止，我已经能够加载json数据并获取字段的值

library("rjson")

data = fromJSON(file="testBaza.json")
json = data.frame(number = unlist(data))

df = data.frame(
  Number = json$number
)
write.table(df, "test.xls", sep = "\t")

结果与我要找的东西相去甚远。 excel文件中的预期结果应如下所示（对于JSON文件中的所有对象而不仅仅是第一个对象）：

在以下情况下输出：dput(head(data))：