r - For 循环和 Map 等价物不匹配

Question

我正在尝试使用 map 函数在 for 循环中复制列表分配。设置非常简单。首先，我们创建一个具有预定长度的列表对象:

list_one <- vector(mode = "list", length = 5)

然后我们用一个命名向量循环它:

for(i in seq_along(list_one)){ 
  list_one[[i]][["percent.mt"]] <- "HELLO"
}

我认为 map 等价物是这样的:

list_two <- vector(mode = "list", length = 5)

list_two <- map(list_two, ~ { 
  .x[["percent.mt"]] <- "HELLO"
  })

但这是两个列表的外观:

> list_one
[[1]]
[[1]]$percent.mt
[1] "HELLO"

[[2]]
[[2]]$percent.mt
[1] "HELLO"

[[3]]
[[3]]$percent.mt
[1] "HELLO"

[[4]]
[[4]]$percent.mt
[1] "HELLO"

[[5]]
[[5]]$percent.mt
[1] "HELLO"

> list_two
[[1]]
[1] "HELLO"

[[2]]
[1] "HELLO"

[[3]]
[1] "HELLO"

[[4]]
[1] "HELLO"

[[5]]
[1] "HELLO"

Answer 1

错误的语法。代替

.x[["percent.mt"]] <- "HELLO"

和

`[[<-`(.x, "percent.mt", "HELLO")

或者

.x[["percent.mt"]] <- "HELLO"; .x