Wolfram Language Paclet Repository
Community-contributed installable additions to the Wolfram Language
KlausSutner`Automata`Utils`
CycleDecomposition  |
| CycleDecomposition[A,f] returns the cycle decomposition of carrier set A f | |
Details and Options
Examples
(1)
Basic Examples
(1)
▪
Generate a random permutation on 20 points.
In[1]:=
p=RandomPermutation[SymmetricGroup[20]]
Out[1]=
Cycles[{{1,17,19,12,20,4,13,11,2,10,5,15,6,16,9},{3,7,18},{8,14}}]
In[2]:=
 | AssignFunction |
▪
By default, CycleDecomposition return the lengths of the cycles.
In[3]:=
| CycleDecomposition |
Out[3]=
{15,3,2}
▪
With option Type"CCD" the cycles are displayed in canonical cycle decomposition (largest element in each cycle in the front, sorted in increasing order according to first element).
In[4]:=
| CycleDecomposition |
 | Type |
Out[4]=
{{17,8,13,9,11,12,4},{19,14,2,16,3,15,6,7,10},{20,1,18,5}}
▪
With option Type"RCCD" the cycles are displayed in reverse canonical cycle decomposition (least element in each cycle in the front, sorted in increasing order according to first element).
In[5]:=
| CycleDecomposition |
| Type |
Out[5]=
{{1,18,5,20},{2,16,3,15,6,7,10,19,14},{4,17,8,13,9,11,12}}
 |
|
 |
|
 |
|
""