有条件地用R中的列表替换列表中的元素

Question

我想这样做

a <- list(1,2,3)
a[a == 2] <- list(1,2,3)

这给了我number of items to replace is not a multiple of replacement length。一般来说，我迭代地希望基于条件替换整数列表中的元素，该条件具有依赖于原始列表中的整数的各种长度的其他列表。

Answer 1

问题并没有说明需要什么结果，但这没有警告或错误，用指示的列表替换a的第二个元素。

a <- list(1, 2, 3)
a[a == 2] <- list(list(1,2,3))

赠送：

> str(a)
List of 3
 $ : num 1
 $ :List of 3
  ..$ : num 1
  ..$ : num 2
  ..$ : num 3
 $ : num 3