R 将JSON列表展平到数据帧中
我有一个包含143个JSON文件(~30MB)的目录,我希望将其合并并转换为平面数据帧。(这可能与有关,但我无法使该解决方案起作用。有关结果,请参见底部。) 我能够很好地解析单个元素,因此我认为我的绊脚石被下面的reprex抓住了:R 将JSON列表展平到数据帧中,r,purrr,jsonlite,R,Purrr,Jsonlite,我有一个包含143个JSON文件(~30MB)的目录,我希望将其合并并转换为平面数据帧。(这可能与有关,但我无法使该解决方案起作用。有关结果,请参见底部。) 我能够很好地解析单个元素,因此我认为我的绊脚石被下面的reprex抓住了: chr <- "[{\"sometext_lets_pretend_its_JSON\":999}]" my_list <- list(chr, chr, chr, chr, chr, chr) library(purrr) my_list %>%
chr <- "[{\"sometext_lets_pretend_its_JSON\":999}]"
my_list <- list(chr, chr, chr, chr, chr, chr)
library(purrr)
my_list %>%
map(~ fromJSON(.x))
#[[1]]
# sometext_lets_pretend_its_JSON
#1 999
#
#[[2]]
# sometext_lets_pretend_its_JSON
#1 999
#
#[[3]]
# sometext_lets_pretend_its_JSON
#1 999
#
#[[4]]
# sometext_lets_pretend_its_JSON
#1 999
#
#[[5]]
# sometext_lets_pretend_its_JSON
#1 999
#
#[[6]]
# sometext_lets_pretend_its_JSON
#1 999
chr你是这个意思吗
my_list %>%
map(~ fromJSON(.x)) %>%
bind_rows()
# sometext_lets_pretend_its_JSON
#1 999
#2 999
#3 999
#4 999
#5 999
#6 999
你是说这个吗
my_list %>%
map(~ fromJSON(.x)) %>%
bind_rows()
# sometext_lets_pretend_its_JSON
#1 999
#2 999
#3 999
#4 999
#5 999
#6 999