将列向量分配给多个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))