문제

this is my code

here the paste function works for only two combination.i need the same code in a loop for more than two combinations at the same time.

i<-2

while (i<=10)
 {
 results<-data.frame()
 results<- t(apply(data,1,function(x) combn(x,i,prod)))
 comb <- combn(colnames(data),i)
 colnames(results) <- apply(comb,i,function(x) paste(x[1],x[2]))
 i<-i+1
 }

now i get the two combination like

V1V2, V1V3,V1V4,....

now i want

 v1v2v3, v1v2v4, ... 

in paste function.

도움이 되었습니까?

해결책

comb <- combn(colnames(data),v)

colnames(results) <- apply(comb,2,function(rows) paste0(rows, collapse = ""))

insted of paste use paste0

@henrik and @chargaff

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top