将列向量分配给多个data.frame对象作为公共属性

Question

我有三个data.frame对象，还有一个向量必须作为新属性添加到它们。我知道向data.frame对象添加属性很容易，但我想将所有对象分配到一起。有没有更好的方法来做到这一点？如何才能更有效地实现这一目标？

# simulated data
df1 <- CO2[1:10,]
df2 <- airquality[1:10,]
df3 <- iris[1:10,]

# objective: assign vector avg.score to df1, df2, df3 together
# this is my attempt:
avg.score <- c(2.95,38.96,5.08,35.84,3.86,4.08,3.97,4.33,3.23,4.08)
df1$avg.score <- avg.score
df2$avg.score <- avg.score
df3$avg.score <- avg.score

我认为我的尝试解决方案不够好，我打赌必须有更简单的方法来做到这一点。谁能给我一些想法？感谢

Answer 1

你可以尝试，

l1 <- list(df1, df2, df3)
lapply(l1, function(i) cbind(i, avg.score))