Multiplying permutations
- To: mathgroup at smc.vnet.net
- Subject: [mg41723] Multiplying permutations
- From: "Dr. Wolfgang Hintze" <weh at snafu.de>
- Date: Tue, 3 Jun 2003 07:13:05 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Is there a simple command in Mathematica to multiply two permutations,
i.e. to carry out one after the other?
I looked at the packages DiscreteMath`Permutations` and
DiscreteMath`Combinatorica` but couldn't find it.
Example
p = {3,1,2} mapping: 1->3, 2->1, 3->2
q = {2,1,3} mapping: 1->2, 2->1, 3->3
p.q = mappings (p first, then q)
[1-p->3-q->3, 2-p->1-q->2, 3-p->2-q->1]
= {3,2,1}
Any help appreciated
Wolfgang