R 根据combn为列表中的数据帧分配名称
我用alply~500创建了一个数据帧列表,如下所示:R 根据combn为列表中的数据帧分配名称,r,list,plyr,combn,R,List,Plyr,Combn,我用alply~500创建了一个数据帧列表,如下所示: prevalence <- alply(combos, 2, prevalence.func) …它告诉我在原始函数中计算每个data.frame的时间间隔 我试着用lappy来形容它 someFunction <-function (x){ names(simple_list)<-paste(combos[x,x[1]],combos[x,x[2]],sep="-") } lapply(simple_lis
prevalence <- alply(combos, 2, prevalence.func)
…它告诉我在原始函数中计算每个data.frame的时间间隔
我试着用lappy来形容它
someFunction <-function (x){
names(simple_list)<-paste(combos[x,x[1]],combos[x,x[2]],sep="-")
}
lapply(simple_list,someFunction)
我的赋值函数显然有点不对劲。有什么建议吗?你可以试试:
names(simple_list)<-lapply(combn(5,2,simplify=FALSE),function(x) paste(x,collapse="-"))
#names(simple_list)
#[1] "1-2" "1-3" "1-4" "1-5" "2-3" "2-4" "2-5" "3-4" "3-5" "4-5"
combn有一个有趣的论点,所以它可以
names(simple_list) <- combn(5,2, FUN= paste, collapse='-')
names(simple_list)
#[1] "1-2" "1-3" "1-4" "1-5" "2-3" "2-4" "2-5" "3-4" "3-5" "4-5"
Error in combos[x, x[1]] : invalid subscript type 'list'
names(simple_list)<-lapply(combn(5,2,simplify=FALSE),function(x) paste(x,collapse="-"))
#names(simple_list)
#[1] "1-2" "1-3" "1-4" "1-5" "2-3" "2-4" "2-5" "3-4" "3-5" "4-5"
names(simple_list) <- combn(5,2, FUN= paste, collapse='-')
names(simple_list)
#[1] "1-2" "1-3" "1-4" "1-5" "2-3" "2-4" "2-5" "3-4" "3-5" "4-5"