Довольно JSON не правильно пишет в R

Question

Я пишу файлы JSON из R с помощью пакета jsonlite.Я хотел бы использовать красивую печать, но результаты получаются неправильными, с большим количеством неожиданных [и \ в тексте, а не с новой строки.

Простой пример:

ls <- list(fruit = c("apples", "oranges"), animals = c("cats","dogs"))
ls <- jsonlite::toJSON(ls, pretty = TRUE)

Это, кажется, работает изнутри R:

ls

{
  "fruit": ["apples", "oranges"],
  "animals": ["cats", "dogs"]
}

Но я выписываю файл:

jsonlite::write_json(ls,"test.json", pretty = TRUE)

Тогда я получаю:

["{\n  \"fruit\": [\"apples\", \"oranges\"],\n  \"animals\": [\"cats\", \"dogs\"]\n}"]

Iиспользую R версии 3.5.0 (2018-04-23) в Windows 10 64 бит

Answer 1

write_json принимает в качестве аргумента объект для сериализации. Так что вы должны сделать:

ls <- list(fruit = c("apples", "oranges"), animals = c("cats","dogs"))
write_json(ls, "test.json", pretty = TRUE)

а не write_json(toJSON(ls), ......).