从 dataFrame 到 R 中的分组 Json

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)

从 dataFrame 到 R 中的分组 Json

From dataFrame to grouped Json in R

r

jsonlite