-3

これは私のコードです

ここで、貼り付け機能は2つの組み合わせでのみ機能します。同時に2つ以上の組み合わせのループで同じコードが必要です。

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
 }

今、私は次のような2つの組み合わせを取得します

V1V2, V1V3,V1V4,....

今私は欲しい

 v1v2v3, v1v2v4, ... 

機能中paste

4

1 に答える 1