从多个数组中各取一个元素，组合有多少种呢,急~~？

pp1984829

A: （a，b，c，d）
B:  （e，f，g，h）
C:   （i，j，k，l）
D:   （m，n，o，p）
E:   （q，r，s，t）

如题，有多个数组，从每个数组中取出一个元素，要求列出所有的组合方案。
（a，e，k，m，t） 这样的方案。

A B C D E是我举个例子，实际上并不知道数组的个数。我感觉要用递归来计算，但是实在想不出，请高手帮忙看下~，谢谢！

picbhan

这不是组合数学么？要不要考虑顺序？不同数组里会不会有相同的元素？

rubyish

是不?

1. a b c
   
2. d e f
   
3. i j k

复制代码

1. a d i
   
2. a d j
   
3. a d k
   
4. a e i
   
5. a e j
   
6. a e k
   
7. a f i
   
8. a f j
   
9. a f k
   
10. b d i
    
11. b d j
    
12. b d k
    
13. b e i
    
14. b e j
    
15. b e k
    
16. b f i
    
17. b f j
    
18. b f k
    
19. c d i
    
20. c d j
    
21. c d k
    
22. c e i
    
23. c e j
    
24. c e k
    
25. c f i
    
26. c f j
    
27. c f k
    

复制代码

rubyish

如题:

1. #!/usr/bin/perl
   
2. use 5.016;
   
3. sub hello { map "@$_$/", @_ }
   
4. sub to { @_ ? map { my $h = $_; map [$h, @$_], to(@_) } @{+shift}:[] }
   
5. my @yesterday = ( [qw/a b c/], [qw/d e f/], [qw/i j k/] );
   
6. say hello to @yesterday;

复制代码

mcshell

回复 1# pp1984829


    点击@rubyish 主题。。你就看到答案了，有相关的主题讨论。。{:3_186:}   就是排列组合{:3_203:}  

rubyish

mcshell 发表于 2013-05-26 20:05
回复 1# pp1984829

如 he 点 ?

mcshell

回复 6# rubyish


    你发的帖子里有“求 012345 其所有排列组合 ”...{:3_186:}

kk861123

只计算组合吗？用排列组合公式啊，如果公式我没记错的话，你的例子是4*4*4*4*4=1024种

rubyish

回复 7# mcshell

谢谢！{:3_188:}
   

rubyish

kk861123 发表于 2013-05-27 05:40
只计算组合吗？用排列组合公式啊，如果公式我没记错的话，你的例子是4*4*4*4*4=1024种

见解独到啊，的确高明!{:3_188:} {:3_188:}