R语言导入JSON列表后如何生成类Excel格式的规范表格

格式校验 #

你提到的目标JSON为标准格式，可直接解析无需额外处理。

实现方法 #

方法一（推荐，无需手动转换） #

使用jsonlite包可直接将结构化JSON自动扁平化为数据框，你之前测试成功的代码只需调整时间参数即可覆盖到2022年数据：

library(jsonlite)
# 解析2018-2022年数据
data3 <- fromJSON("https://www.ser-ag.com/sheldon/management_transactions/v1/overview.json?pageSize=10000&pageNumber=0&sortAttribute=byDate&fromDate=20181201&toDate=20221131")
# 查看返回字段
names(data3)
# 查看生成的规整表格
View(data3$itemList)

运行后data3$itemList就是你需要的类Excel表格，自动将buysellindicator等name字段值作为列名，对应value作为行值。

方法二（rjson适配方案） #

如果要继续使用rjson包，需手动对嵌套列表做长宽转换：

library(rjson)
library(tidyverse)
url <- "https://www.ser-ag.com/sheldon/management_transactions/v1/overview.json?pageSize=10000&pageNumber=0&sortAttribute=byDate&fromDate=20181201&toDate=20221131"
document <- fromJSON(file = url, method = "C")
# 转换嵌套列表为规整表格
df <- map_dfr(document$itemList, ~as_tibble(.x) %>% pivot_wider(names_from = name, values_from = value))
# 查看结果
View(df)

内容的提问来源于stack exchange，提问作者Remo Wyss