我需要在R中将数据帧转换为json格式

Question

我有这个数据框：

dput（头（DAT））

structure(list(out = c(5, 0, 0, 0, 0, 0), Date = c(1423825200000, 
1423825500000, 1423825800000, 1423826100000, 1423826400000, 1423826700000
)), .Names = c("out", "Date"), row.names = c(NA, 6L), class = "data.frame")

我需要将其转换为json格式。

我试过了：

dList <- unname(apply(dat[,1:2], 1, function(y) unname(as.list(y))))
df1<-toJSON(list( data = dList))

我得到这样的东西：

{"data":[[[5],[1423825200000]],[[0],[1423825500000]],[[0],[1423825800000]],[[0],[1423826100000]],[[0],[1423826400000]],[[0],[1423826700000]],[[0],[1.423827e+12]],[[0],[1423827300000]],[[0],[1423827600000]],[[0],[1423827900000]]}

我需要这个：

 [[5, 1423825200000.0], [0, 1423825500000.0], [0, 1423825800000.0], [0, 1423826100000.0], [0, 1423826400000.0], [0, 1423826700000.0], [0, 1423827000000.0], [0, 1423827300000.0], [0, 1423827600000.0], [0, 1423827900000.0]]

我在R

中如何做到这一点

Answer 1

将dat转换为矩阵，然后通过jsonlite::toJSON

运行

jsonlite::toJSON(as.matrix(dat))
# [[5,1423825200000],[0,1423825500000],[0,1423825800000],[0,1423826100000],[0,1423826400000],[0,1423826700000]]