グループ化された要素の組み合わせ

Question

グループ化された要素のリストがありますが、これらの要素のすべての組み合わせを作成したいと思いますが、各グループから1つの要素を取りたいだけです。順序は関係ありません。

vars_list <- list(Group1 = letters[1:5], Group2 = letters[6:9], 
        Group3 = letters[10:11], Group4 = letters[12:15]) 

ここで、n = 2、n = 3、n = 4の組み合わせを作成したいとします。ここで、nは使用するグループの数です。

私はそれを行うための解決策を見つけたのn =グループの数（Combinations from recursive lists）：私はグループのn個<数のためにこれを行うことができますどのように

lengths <- c(1, 1, 1, 1) 
combos <- expand.grid(mapply(function(element, n) combn(element, m=n, 
FUN=paste0, collapse=""), vars_list, lengths, SIMPLIFY = F)) 

？

あなたは、n = 1のために、あなたのグループのすべての組み合わせを取得するため combnを使用することができ

Answer 1

、N = 2、n = 3であり、n = 4、次に使用expand_grid：

n = 2 
apply(combn(1:length(vars_list), n), 2, function(x){expand.grid(vars_list[x])}) 

ので、nの= 4、あなたあなたの質問と同じようになるでしょう。これはあなたが意味することですか？