R：sapply 中的父赋值运算符

Question

考虑由以下代码创建的两级列表：

a = list()
s = seq(1,5)
for (i in s) {
  a[[i]] = list(field1 = i, field2 = letters[i])
}

假设我想向每个子列表添加第三个元素“field3”，并使用以下 sapply(..) 和父赋值运算符的组合来完成：

sapply(s, function(x) a[[x]]$field3 <<- 5 - x)

这是危险的还是被视为滥用父赋值运算符？ 推荐的替代方案是什么？ 使用这个 sapply 语句而不是 for 循环是否有潜在的速度提升？

Answer 1

在这种情况下，我倾向于使用for-loop 。 它更清晰并且sapply不会加速 AFAIK，因为sapply只是引擎盖下for-loop一个特例。 有关详细信息，请参见此处。

例如：

for (i in s) a[[i]]$field3 <- 5 - i