Re: Finding all n-partitions of a set
- To: mathgroup at smc.vnet.net
- Subject: [mg98738] Re: [mg98707] Finding all n-partitions of a set
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Fri, 17 Apr 2009 04:29:25 -0400 (EDT)
- Reply-to: hanlonr at cox.net
Needs["Combinatorica`"]; Union[Sort /@ KSetPartitions[{a, a, b, b}, 2]] {{{a}, {a, b, b}}, {{b}, {a, a, b}}, {{a, a}, {b, b}}, {{a, b}, {a, b}}} Bob Hanlon ---- "Joe.Mapasapam" <mapasapam at gmail.com> wrote: ============= Please how can I find all n-partions of a set ? Say, i want partitions of the set (no order) {a,a,b,b} into 2, so we have { {{a,a,b,},{b}}, {{a,b,b},{a}}, {{a,a},{b,b}}, {{a,b},{a,b}} } is there already a built in function in mathematica ? i need so n can be any number