r - 将 dplyr::mutate 与 mapply 一起使用时出错

Question

我想对列表中的每个数据帧使用 mutate，将列 z = 3 添加到第一个，将 z = 4 添加到第二个(并且返回两个数据框的列表)。

dfs <- list(data.frame(x = 1), data.frame(y = 2))
mapply(dplyr::mutate, dfs, z = 3:4, SIMPLIFY = FALSE)
#> Error in lazyeval::lazy_dots(...): Promise has already been forced

我出了什么问题，我应该如何去做我想做的事情？

Answer 1

使用匿名函数有效:

mapply(function(df, z) mutate_(df, z=z), dfs, 3:4, SIMPLIFY=FALSE)
#[[1]]
#  x z
#1 1 3
#
#[[2]]
#  y z
#1 2 4