A374516 Sum of leaders of maximal anti-runs in the n-th composition in standard order.
0, 1, 2, 2, 3, 2, 1, 3, 4, 3, 4, 3, 1, 1, 2, 4, 5, 4, 3, 4, 2, 4, 2, 4, 1, 1, 3, 2, 2, 2, 3, 5, 6, 5, 4, 5, 6, 3, 3, 5, 2, 2, 6, 5, 2, 2, 3, 5, 1, 1, 1, 2, 1, 3, 1, 3, 2, 2, 4, 3, 3, 3, 4, 6, 7, 6, 5, 6, 4, 4, 4, 6, 3, 6, 5, 4, 3, 3, 4, 6, 2, 2, 2, 3, 4, 6, 4
Offset: 0
Keywords
Examples
The 1234567th composition in standard order is (3,2,1,2,2,1,2,5,1,1,1), with maximal anti-runs ((3,2,1,2),(2,1,2,5,1),(1),(1)), so a(1234567) is 3 + 2 + 1 + 1 = 7.
Links
Crossrefs
For length instead of sum we have A333381.
Row-sums of A374515.
Other types of runs (instead of anti-):
A065120 gives leaders of standard compositions.
A106356 counts compositions by number of maximal anti-runs.
A238279 counts compositions by number of maximal runs
A238424 counts partitions whose first differences are an anti-run.
All of the following pertain to compositions in standard order:
- Length is A000120.
- Sum is A029837(n+1).
- Parts are listed by A066099.
Six types of maximal runs:
Programs
-
Mathematica
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse; Table[Total[First/@Split[stc[n],UnsameQ]],{n,0,100}]
Comments