从嵌套列表中组合不同长度的元素

Question

给出以下结构:

a <- list()
a[[1]] <- list(c(1:3),c(3:8))
a[[2]] <- list(c(2:6),c(7:9),c(18:24))
a[[3]] <- list(c(11:13),c(10:16),c(17:19),c(11:14),c(17:20))

这意味着a[[1]]有2个元素,a[[2]]3个元素和a[[3]]5个元素.

我想从a中的元素创建所有可能的组合.因此,例如,a[[1]][1]可以结合a[[2]][1],a[[2]][2]和a[[2]][3].所有这些结果都可以与a[[3]][1]...... 结合使用a[[3]][5](总之它应该是30种组合).通过组合我的意思是应用于c元素.

我假设这归结为搜索树末端的元素(例如,如果我在阶段1中有A1或A2,阶段2中有B1或B2,阶段3中有C1或C2,则所有结果都是:A1B1C1,A1B1C2,A1B2C1 ,A1B2C2,A2B1C1,A2B1C2,A2B2C1,A2B2C2.)

好的,现在我知道如何使用三重嵌套循环执行此操作,但如果列表a变大,会发生什么？我不知道是否可以这样做.任何建议赞赏.

Answer 1

用途expand.grid {base}:

a <- list()
a[[1]] <- list(c(1:3),c(3:8))
a[[2]] <- list(c(2:6),c(7:9),c(18:24))
a[[3]] <- list(c(11:13),c(10:16),c(17:19),c(11:14),c(17:20))

comb <- expand.grid(a)