json - 如何在 R 中将多个 JSON 文件合并为一个文件

Question

我有三个 JSON 文件

• json1 包含 [[1,5],[5,7],[8,10]]
• json2 包含 [[5,6],[4,5],[5,8]]
• json3 包含 [[4,7],[3,4],[4,8]]

我想将它们合并到一个文件jsonmerge:

  [[[1,5],[5,7],[8,10]],[[5,6],[4,5],[5,8]],[[4,7],[3,4],[4,8]]]

我尝试连接，但它给出了这种格式的结果

   [[5,6],[4,5],[5,8]],
   [[5,6],[4,5],[5,8]],
   [[4,7],[3,4],[4,8]]

有什么建议吗？

提前致谢。

Answer 1

如果您使用的是rjson包，那么您需要将它们连接到一个列表中:

library(rjson)
json1 <- fromJSON(file = "json1")
json2 <- fromJSON(file = "json2")
json3 <- fromJSON(file = "json3")
jsonl <- list(json1, json2, json3)
jsonc <- toJSON(jsonc)
jsonc
[1] "[[[1,5],[5,7],[8,10]],[[5,6],[4,5],[5,8]],[[4,7],[3,4],[4,8]]]"
write(jsonc, file = "jsonc")

如果您有很多文件，可以将它们放入向量中并使用 lapply 来节省一些输入:

files <- c("json1", "json2", "json3")
jsonl <- lapply(files, function(f) fromJSON(file = f))
jsonc <- toJSON(jsonl)
write(jsonc, file = "jsonc")