使用apply在R中添加多个列（超过100个）随机数或其他函数

Question

我想构建一个向数据帧添加许多随机变量或其他函数列的函数。在这里，我试图将其附加到地图数据。

library(plyr)

add <- function(name, df){
  new.df = mutate(df, name = runif(length(df[,1])))
  new.df
}

该功能可以添加一列数据......

add("e", iris) 
iris2<- add("f", iris)

申请不起作用...... 我想在letters列表中添加26列，以便df $ a，df $ b，df $ c都是随机向量。

new <- lapply(letters, add, df = tx)

列名列表中列的最有效方法是什么？ 我想稍后遍历另一个函数中的所有列名。

Answer 1

对我来说，你想要达到的目标并不是很清楚。这会将多列随机数添加到data.frame：

cbind(iris, 
      matrix(runif(nrow(iris)*5), ncol=5))

我没有理由使用*apply函数。