Импорт нескольких файлов json из каталога и прикрепление данных

Я пытаюсь прочитать несколько файлов json в рабочий каталог для дальнейшего преобразования в набор данных. У меня есть файлы text1, text2, text3 в каталоге json. Вот код, который я написал:

setwd("Users/Desktop/json")
temp = list.files(pattern="text*.")
myfiles = lapply(temp, read.delim)
library("rjson")
json_file <- "myfiles"
library(jsonlite)
out <- jsonlite::fromJSON(json_file)
out[vapply(out, is.null, logical(1))] <- "none"
data.frame(out, stringsAsFactors = FALSE)[,1:5]
View(out)

У меня около 200 файлов, поэтому мне было интересно, есть ли способ импортировать файлы json.

Спасибо


person user3570187    schedule 14.11.2014    source источник
comment
Взгляните на этот тоже решение.   -  person amonk    schedule 28.02.2017


Ответы (1)


Я думаю, что у меня была похожая проблема при работе с данными Twitter. У меня был каталог, содержащий отдельные файлы для каждого имени пользователя, и я хотел импортировать/анализировать их как группу. Это сработало для меня:

library(rjson)
filenames <- list.files("Users/Desktop/json", pattern="*.json", full.names=TRUE) # this should give you a character vector, with each file name represented by an entry
myJSON <- lapply(filenames, function(x) fromJSON(file=x)) # a list in which each element is one of your original JSON files

Если это не сработает, мне нужно немного больше информации, чтобы понять вашу проблему.

person user2047457    schedule 09.04.2015