Re: All combinations
- To: mathgroup at smc.vnet.net
- Subject: [mg47373] Re: [mg47357] All combinations
- From: Andrzej Kozlowski <akoz at mimuw.edu.pl>
- Date: Wed, 7 Apr 2004 03:16:31 -0400 (EDT)
- References: <200404061036.GAA09271@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
On 6 Apr 2004, at 19:36, János wrote: > Hi, > > I need in a list of all 'k' length combinations of set of 'n' different > elements where k can be smaller or bigger than n. For example if I > have n=4 and the set is {a,b,c,d} then all combinations of k=7 length > would be > > {{a,a,a,a,a,a,a} > {a,a,a,a,a,a,b} > {a,a,a,a,a,b,a} > ... > ... > {d,d,d,d,d,d,d}} > > and the Length of it is about 4^7, in general n^k. > > I looked <<DiscreteMath`Combinatorica and found Permutations, but it > is just a subset I am looking for. I can program it out, but would > prefer a built in or add-on functions if one is already there. > > Can you point me to the right direction ? > > Thanks ahead, > János > ----------------------------------------------------- > So, while openness provides a couple of security advantages in itself, > the chief reason why Linux and BSD offer superior security is not so > much because they're open source, but because they're not Windows. > http://www.theregister.co.uk/content/55/36029.html > > There is no build in function but: AllCombinations[S_List,k_]:=Distribute[Table[S,{k}],List] dos the trick, e.g: Length[AllCombinations[{a,b,c,d},7]] 16384 Andrzej Kozlowski Chiba, Japan http://www.mimuw.edu.pl/~akoz/
- References:
- All combinations
- From: János <janos.lobb@yale.edu>
- All combinations