Question

list(list(NULL,NULL),list(NULL,NULL))

结果是：

[[1]]
[[1]][[1]]
NULL

[[1]][[2]]
NULL

[[2]]
[[2]][[1]]
NULL

[[2]][[2]]
NULL

假设我想对大于2的数字执行此操作，是否有办法通过复制获得相同的列表结构？

Answer 1

使用replicate

replicate(n=3, {replicate(n=3,NULL,simplify=FALSE)},simplify=FALSE)


[[1]]
[[1]][[1]]
NULL

[[1]][[2]]
NULL

[[1]][[3]]
NULL


[[2]]
[[2]][[1]]
NULL

[[2]][[2]]
NULL

[[2]][[3]]
NULL


[[3]]
[[3]][[1]]
NULL

[[3]][[2]]
NULL

[[3]][[3]]
NULL

或更简单（感谢@RichardScriven）

replicate(3, list(replicate(3, list(NULL))))

Answer 2

您可以使用rep来填写更少的字母：

rep(list(rep(list(NULL), 3)), 3)


[[1]]
[[1]][[1]]
NULL

[[1]][[2]]
NULL

[[1]][[3]]
NULL


[[2]]
[[2]][[1]]
NULL

[[2]][[2]]
NULL

[[2]][[3]]
NULL


[[3]]
[[3]][[1]]
NULL

[[3]][[2]]
NULL

[[3]][[3]]
NULL

Answer 3

也许编写一个小函数，以便您可以调整每个列表的复制和长度，还可以选择返回数组或列表。

nest <- function(len = 1L, n = 1L, ...) {
    replicate(n, vector("list", len), ...)
}
nest()
nest(2)
nest(2, simplify = FALSE)
nest(3, 2, simplify = FALSE)

R如何在列表中复制空值

3 个答案: