r - 将新变量添加到 data.frames 列表的每个元素

Question

我有一个数据框列表 (C)。我想向每个数据帧添加一个新变量“d”，它是“a”和“b”的总和。这是一个简短的示例。

A<-data.frame(1:10, 101:110, 201:210)
colnames(A)=c("a","b", "c")

B<-data.frame(11:20, 111:120, 211:220)
colnames(B)=c("a","b", "c")

C<-list(A, B)

我已经尝试过这个，但我认为可能有更简单的东西，特别是考虑到行的最后部分 ( value= (("["(C[[x]][1]))) + ("["(C[[x]][2])) )

lapply(seq(C), function(x) "[[<-" (C[[x]], 3, value= (("["(C[[x]][1]))) + ("["(C[[x]][2])))

有什么想法吗？顺便说一句，我如何选择创建的变量的名称？提前致谢

Answer 1

或者使用cbind

C <- lapply(C, function(x) cbind(x, d = x[["a"]] + x[["b"]]))

或者使用rowSums

C <- lapply(C, function(x) cbind(x, d = rowSums(x[1:2])))