使用 jsonlite 将 R 中的未命名列表写入 json 数组

Question

我正在将数据发送给一位 C# 开发人员，他想使用 http://json2csharp.com/ 将我的数据字符串转换为对象数组。我认为 jsonlite 包对此有好处，但他没有得到他想要的结果，而且当我检查生成的输出时，它并不完全是我所期望的。我对这种情况的解释是

生成的输出

x <- list( 
  a=list( a=1,b='x',c=list("Foo","Bar"), d=as.Date("2015-01-01") ),
  b=list( a=2,b='y',c=list("Hello","World"), d=as.Date("2014-12-31") ),
  c=list( a=3,b='z',c=NULL, d=as.Date("2016-02-29") )
)
toJSON(x, pretty = FALSE )

是

{"a":{"a":[1],"b":["x"],"c":[["Foo"],["Bar"]],"d":["2015-01-01"]},"b":{"a":[2],"b":["y"],"c":[["Hello"],["World"]],"d":["2014-12-31"]},"c":{"a":[3],"b":["z"],"c":{},"d":["2016-02-29"]}}

它将所有子元素数据放入列表中，同时将父命名列表视为命名元素的对象。 R 没有为 JSON 设计的那种类型，所以这可能是 toJSON 的预期行为，但我想要更像

的东西

[{"a":1,"b":"x","c":["Foo","Bar"],"d":"2015-01-01"},{"a":2,"b":"y","c":["Hello","World"],"d":"2014-12-31"},{"a":3,"b":"z","c":{},"d":"2016-02-29"}]

如何将 R 中的列表写入 jsonlite 中的 JSON 数组？

Answer 1

事实证明，取消命名列表并设置 auto_unbox 正是我要找的。将代码更改为：

x2 <- list( 
  list( a=1,b='x',c=list("Foo","Bar"), d=as.Date("2015-01-01") ),
  list( a=2,b='y',c=list("Hello","World"), d=as.Date("2014-12-31") ),
  list( a=3,b='z',c=NULL, d=as.Date("2016-02-29") )
)
toJSON(x2, auto_unbox = TRUE, pretty = FALSE )

或

x2 <- unname(x)
toJSON(x2, auto_unbox = TRUE, pretty = FALSE )

结果是我正在寻找的对象数组：

[{"a":1,"b":"x","c":["Foo","Bar"],"d":"2015-01-01"},{"a":2,"b":"y","c":["Hello","World"],"d":"2014-12-31"},{"a":3,"b":"z","c":{},"d":"2016-02-29"}]

虽然我不能说出他们的名字。

使用 jsonlite 将 R 中的未命名列表写入 json 数组

Using jsonlite to write an unnamed list from R into a json array

json

r

list

jsonlite