Проблема R, JSON объектов в CSV-файле, по одному на ячейку: - PullRequest
Новая
       50

Проблема R, JSON объектов в CSV-файле, по одному на ячейку:

0 голосов
/ 29 мая 2020 
{"received":1588687345,"guid":"0CA2F400004","eventtype":"sensor","payload":{"time":1588687345,"sensor":[{"type":"temp","unit":"degc","value":20}]}}
{"received":1588687346,"guid":"0CA2F400004","eventtype":"sensor","payload":{"time":1588687344,"sensor":[{"type":"temp","unit":"degc","value":22}]}}
{"received":1588687346,"guid":"0CA2F400004","eventtype":"sensor","payload":{"time":1588687346,"sensor":[{"type":"temp","unit":"degc","value":22}]}}
{"received":1588687348,"guid":"0CA2F400004","eventtype":"sensor","payload":{"time":1588687347,"sensor":[{"type":"temp","unit":"degc","value":28}]}}
{"received":1588687349,"guid":"0CA2F400004","eventtype":"sensor","payload":{"time":1588687347,"sensor":[{"type":"temp","unit":"degc","value":-667}]}}

все данные находятся в первом столбце файла csv. Я хотел бы преобразовать в читаемый формат, например фрейм данных, и сохранить с помощью write.csv ()? Спасибо за помощь enter image description here

1 Ответ

0 голосов
/ 31 мая 2020 
library(jsonlite)

df <- read.csv("example.csv", header = FALSE)

jsonlite::stream_in(textConnection(gsub("\\n", "", df)))
...