我有一个清单:
f1= function(data){
data1= data*2
return (data1)
}
f2= function(data){
data1= data*4
return (data1)
}
f3= function(data){
data1= data*data
return (data1)
}
f4= function(data){
data1= data**5
return (data1)
}
data = matrix(1:100,10,10)
ff <- list(f1=f1,f2=f2,f3=f3,f4=f4)
我知道如何使用无关紧要的地方查找此列表的所有可能组合。
allcomb <- function(x) {
do.call("c", lapply(seq_along(x), function(n) combn(x,n, simplify=FALSE)))
}
allcomb(ff)
然而,订单很重要。我该怎么办?我试过了:
allcomb <- function(x) {
do.call("c", lapply(seq_along(x), function(n) permn(n)))
}
allcomb(ff)
函数permn只给出了4的排列。它没有给出我需要的小于4的排列。我该怎么做?