Экспорт в JSON список списка в R

Question

Мне нужно экспортировать в json список списков, чтобы получить выходной JSON, подобный следующему:

{
  "timestamp":"2018-02-01 10:20",
  "aux":[
    {"id":"x1","prog":['A','A','A']},
    {"id":"x2","prog":['A','A','A']},
    {"id":"x3","prog":['A','A','A']}
  ]
}

Как мне создать список, чтобы получить JSON, подобный этому?Заранее спасибо.

РЕДАКТИРОВАТЬ:

Это то, что я пытаюсь:

l1 <- list(timestamp = "2018-02-01 10:20", 
           aux = list(id = c("x1","x2","x3"), 
           prog = rep('A',3)))

И это JSON, который я получаю:

{"timestamp":"2018-02-01 10:20",
 "aux":{"id":["x1","x2","x3"],
        "prog":["A","A","A"]}
}

Answer 1

Вы можете получить эту структуру с дополнительным уровнем списков:

l1 <- list(timestamp = "2018-02-01 10:20", 
           aux = list(list(id = "x1", prog = rep('A',3)),
                      list(id = "x2", prog = rep('A',3)),
                      list(id = "x3", prog = rep('A',3))))

jsonlite::toJSON(l1, pretty = TRUE, auto_unbox = TRUE)
#> {
#>   "timestamp": "2018-02-01 10:20",
#>   "aux": [
#>     {
#>       "id": "x1",
#>       "prog": ["A", "A", "A"]
#>     },
#>     {
#>       "id": "x2",
#>       "prog": ["A", "A", "A"]
#>     },
#>     {
#>       "id": "x3",
#>       "prog": ["A", "A", "A"]
#>     }
#>   ]
#> }