json - 从列表的 jsonlite 转换中保留 json 对象中的重复名称

Question

如何使用 jsonlite 保留重复名称将列表转换为 json 对象？

z<-as.list(letters[1:3])
names(z)<-c("tmp","tmp","tmp")
toJSON(z,auto_unbox=TRUE)

结果是

 {"tmp":"a","tmp.1":"b","tmp.2":"c"}

但是我需要

 {"tmp": ["a", "b", "c"]}

更新：一个更简单的解决方案是将所有内容捆绑到一个列表中

 my_list<-list()
 my_list$id<-"id"
 my_list$tmp<-c("a","b","c")
 toJSON(my_list,auto_unbox=T) # properly formatted JSON

更新：这个问题很好地处理了单独拆箱每个 JSON 对象的情况，该对象使用 jsonlite 或其他东西从 R 中编码 JSON 表达式

score 2 · Accepted Answer

您必须自己进行对象操作以重塑对象以获得正确的 JSON 输出。要获得所需的输出，您需要一个命名的数组列表。以下是如何将数据转换为此类对象的方法

jsonlite:::toJSON(with(stack(z), tapply(values, ind, c, simplify=FALSE)))
# {"tmp":["a","b","c"]}

基本上stack()将数据折叠到 data.frame 中，然后我们将数据分组到列表中。

1 回答 1