【发布时间】:2019-08-23 18:33:19
【问题描述】:
我在一个目录中有数千个非常小的 json 文件。
现在,我正在使用以下代码来加载它们:
library(dplyr)
library(jsonlite)
library(purrr)
filelistjson <- list.files(DATA_DIRECTORY, full.names = TRUE, recursive = TRUE)
filelistjson %>% map(., ~fromJSON(file(.x)))
不幸的是,这非常慢(我也尝试过furrr::future_map)我想知道这里是否有更好的方法。单个文件的大小几乎没有 25KB...
文件如下所示,有几个嵌套变量,但没有太复杂
{
"field1": "hello world",
"funny": "yes",
"date": "abc1234",
"field3": "hakuna matata",
"nestedvar":[
"http://www.stackoverflow.com",
"http://www.stackoverflow.com/funny"
],
"othernested":[
{
"one": "two",
"test": "hello"
}
]
}
谢谢!
【问题讨论】:
-
您可以添加至少一个文件的示例并指定您使用的软件包吗?
-
请查看更新后的问题。谢谢!
-
您的 JSON 有缺陷 - 将
=切换为:并且您忘记了一个元素或有一个不需要的逗号。 -
@niko,谢谢,我已修正错字
-
你的操作系统是什么?
标签: r json purrr jsonlite furrr