От dataFrame к сгруппированному Json в R

Question

У меня есть фрейм данных в R:

ID   var1  var2 
1    12    Name1
1    13    Name4
2    13    Name2
3    14    Name3

, и я хочу преобразовать в JSON, группируя те, которые имеют тот же ID:

{
"group":
[
{"ID" : 1, "var1": 12, "var2": "Name1" },
{"ID" : 1, "var1": 13, "var2": "Name4" }
]
},
{
"group":
[
{"ID" : 2, "var1": 13, "var2": "Name2" }
]
},
{
"group":
[
{"ID" : 3, "var1": 14, "var2": "Name3" }
]
}

Я также хочу сохранитькаждая группа в файле .json, поэтому в приведенном выше примере у меня будет 3 файла .json

Но я не могу придумать, как это сделать, ни смонтировать json так, как я хочу, нисохранить каждую группу отдельно в файле .json.

Буду признателен за любую помощь: -)

Answer 1

Мы можем использовать jsonlite

library(jsonlite)
library(purrr)
lst1 <-  map(split(df1, df1$ID), toJSON)
names(lst1) <- paste0('group', names(lst1))
toJSON(lst1)