R-如何以类似于for循环的方式将Lapply与两个不同的列表一起使用

Question

我想在R中迭代两个列表，并使用lapply或Purrr的map函数应用功能。该代码准确地显示了我想使用for for循环的操作。

nums_a <- list(c(1,2,3),c(5,6,7))
nums_b <- list(c(13,42,63),c(75,76,27))
nums_c <- list(NULL)
for (i in seq_along(nums_a)) {
 nums_c[[i]] <- nums_a[[i]]+nums_b[[i]]
}
nums_c
[[1]]
[1] 14 44 66
[[2]]
[1] 80 82 34

Answer 1

在purrr中，可以使用map2。

library(purrr)
map2(nums_a, nums_b, ~.x + .y)
# [[1]]
# [1] 14 44 66
# 
# [[2]]
# [1] 80 82 34