A375125 Strictly increasing run-leader transformation for standard compositions.
0, 1, 2, 3, 4, 5, 1, 7, 8, 9, 10, 11, 1, 3, 3, 15, 16, 17, 18, 19, 2, 21, 5, 23, 1, 3, 6, 7, 3, 7, 7, 31, 32, 33, 34, 35, 36, 37, 9, 39, 2, 5, 42, 43, 5, 11, 11, 47, 1, 3, 6, 7, 1, 13, 3, 15, 3, 7, 14, 15, 7, 15, 15, 63, 64, 65, 66, 67, 68, 69, 17, 71, 4, 73
Offset: 0
Keywords
Examples
The 813th composition in standard order is (1,3,2,1,2,1), with strictly increasing runs ((1,3),(2),(1,2),(1)), with leaders (1,2,1,1). This is the 27th composition in standard order, so a(813) = 27.
Links
Crossrefs
Ranks of rows of A374683.
The weak version is A375123.
The weak opposite version is A375124.
The opposite version is A375126.
A011782 counts compositions.
All of the following pertain to compositions in standard order:
- Length is A000120.
- Parts are listed by A066099.
- Run-length transform is A333627.
- Run-sum transformation is A353847.
Six types of runs:
Programs
-
Mathematica
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse; stcinv[q_]:=Total[2^(Accumulate[Reverse[q]])]/2; Table[stcinv[First/@Split[stc[n],Less]],{n,0,100}]
Comments