Question

我想在jsonlite中使用json文件导入R中的矩阵列表。

A <- matrix(rnorm(100),10,10)
B <- matrix(rnorm(100),10,10)
C <- matrix(rnorm(100),10,10)
l <- list(A,B,C)
import_l <- fromJSON(toJSON(l),simplifyMatrix = FALSE)

上面的代码不起作用，因为它是R内部的数字列表列表。但是，我希望我的A,B,C列表返回，即l。有没有办法使用jsonlite获得正确的矩阵列表？

Answer 1

这里的问题是，如果转换为JSON，列矩阵和未命名列表看起来相同：

toJSON(list(1, 2, 3))
## [[1],[2],[3]] 
toJSON(matrix(c(1, 2, 3), ncol = 1))
## [[1],[2],[3]]

但是，名为的列表看起来不同：

toJSON(list(A = 1, B = 2, C = 3))
## {"A":[1],"B":[2],"C":[3]}

如果您在示例中使用了命名列表，fromJSON()确实会重现原始列表：

l <- list(A = A, B = B, C = C)
all.equal(fromJSON(toJSON(l)), l, tol = 1e-4)
## [1] TRUE

如果无法做到这一点 - 例如因为您没有自己创建JSON文件，而是将其作为输入 - 您还可以转换fromJSON()得到的结果：

l <- list(A, B, C)
import_l <- fromJSON(toJSON(l))
l2 <- lapply(1:3, function(i) import_l[i, , ])
all.equal(l2, l, tol = 1e-4)
## [1] TRUE

列出R中jsonlite的转换

1 个答案: