read_csv не работает с отдельными запятыми и не захватывает отдельные строки

Question

Я пытаюсь проанализировать текстовый файл журнала, например, я могу использовать файл read.csv по умолчанию для анализа этого файла.

test <- read.csv ("test.txt", header = FALSE) </p>

Он разделил все запятые, хотя и не идеально помещал в фрейм данных, для улучшения можно выполнить дальнейшие манипуляции.
Тем не менее, я не могу сделать это, используя пакет readr

test <- read_csv ("test.txt", header = FALSE) </p>

Все наблюдения превращаются в один ряд, без запятых.
Я изучаю этот пакет, поэтому любая помощь будет отличной.

{ "dev_id": "f8: f0: 05: ое: дб: ое", "данные": [{ "расстояние": [7270,7269,7269,7275,7270,7271,7265,7270,7274 , 7267,7271,7271,7266,7263,7268,7271,7266,7265,7270,7268,7264,7270,7261,7260]}, { "Temp": 0}, { "шум": 0}, { "Vin": 448}], "время": 4485318, "transmit_time": 4495658, "вариант": "1.0"} { "Dev_id": "f8: хх: 05: хх: D9: хх", "данные": [{ "расстояние": [6869,6868,6867,6871,6866,6867,6863,6865,6868,6869, 6868,6860,6865,6866,6870,6861,6865,6868,6866,6864,6866,6866,6865,6872]}, { "Temp": 0}, { "шум": 0}, { "Vin" : 449}], "время": 4405316, "transmit_time": 4413715, "вариант": "1.0"} { "Dev_id": "хх: f0: 05: E8: да: хх", "данные": [{ "расстояние": [5775,5775,5777,5772,5777,5770,5779,5773,5776,5777, 5772,5768,5782,5772,5765,5770,5770,5767,5767,5777,5766,5763,5773,5776]}, { "Temp": 0}, { "шум": 0}, { "Vin" : 447}], "время": 4461316, "transmit_time": 4473307, "вариант": "1.0"} { "Dev_id": "хй: f0: хй: E8: хй: 0a", "данные": [{ "расстояние": [4358,4361,4355,4358,4359,4359,4361,4358,4359,4360, 4360,4361,4361,4359,4359,4356,4357,4361,4359,4360,4358,4358,4362,4359]}, { "Temp": 0}, { "шум": 0}, { "Vin" : 424}], "время": 5190320, "transmit_time": 5198748, "вариант": "1.0"}

Answer 1

Благодаря @ Dave2e, указавшему, что этот файл в формате JSON, я нашел способ его проанализировать с помощью ndjson :: stream_in.