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

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

library(plyr)

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

从列名称列表中删除列的最有效方法是什么？

---

我想稍后在另一个函数中循环使用所有列名。

我不太清楚您想要实现什么。这会将多列随机数添加到data.frame：

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

---

我看不出有什么理由使用

*apply

功能。

这很有效。。然后用

colnames（d）[6:10]更改名称
new <- lapply(letters, add, df = tx)

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