[math-fun] more on bijections on partitions
4 Sep
2005
4 Sep
'05
5:59 a.m.
Odd-Strict partitions <--> Self Conjugate partitions OEIS : A000700 the Ferrer's plots are a dead give-away: start from a self-conjugate partition with its symmetric Ferrer's plot, peel the onion by taking away its first row and column, repeat on the rest until nothing left. The lengths of the peels (obviously different, obviously odd) are the corresponding odd-strict partition. Mma: peel[par:{__Integer}]:=-1+2*Map[First,Drop[FixedPointList[DeleteCases[Rest[#]-1,0|{}]&,par,SameTest-
( #2==={}&)],-1]]
joinpeels[rinds:{__Integer}]:=Flatten[{#,Drop[TransposePartition[#],Length[#]]}]&[(1+rinds)/2+Range[ 0,Length[rinds]-1] ] Partitions in more than one part, you *got* to love them. W.
7383
Age (days ago)
7383
Last active (days ago)
0 comments
1 participants
participants (1)
-
wouter meeussen