R 在数据框中应用函数列列表

R 在数据框中应用函数列列表,r,apply,R,Apply,我有两个变量,a和ba可能非常大b始终是可应用于数据帧a中每列的函数向量 a <- data.frame(col1=c(1, 2, 3), col2=c(4, 5, 6)) b <- c(as.double, function(x) {1+x}) a这是一种方法: results <- mapply(function(i,j) b[[i]](a[[j]]), i=1:length(b), j=1:length(a)) 为什么需要循环?我想mapply可能有用。参见类似于m

我有两个变量,
a
b
<代码>a可能非常大
b
始终是可应用于数据帧
a
中每列的函数向量

a <- data.frame(col1=c(1, 2, 3), col2=c(4, 5, 6))
b <- c(as.double, function(x) {1+x})

a这是一种方法:

results <- mapply(function(i,j) b[[i]](a[[j]]), i=1:length(b), j=1:length(a)) 

为什么需要循环?我想
mapply
可能有用。参见类似于
mapply(函数(x,y)y(x),x=a,y=b)
perhapsrcriv,我不需要循环本身,我的意思是可以这样做(对于每个列,在b中获得相应的索引函数并应用)-但正如我所说的,我更喜欢向量化方法
> results
     [,1] [,2]
[1,]    1    5
[2,]    2    6
[3,]    3    7