|
|
A374741
|
|
Sum of leaders of weakly decreasing runs in the n-th composition in standard order.
|
|
13
|
|
|
0, 1, 2, 1, 3, 2, 3, 1, 4, 3, 2, 2, 4, 3, 3, 1, 5, 4, 3, 3, 5, 2, 4, 2, 5, 4, 3, 3, 4, 3, 3, 1, 6, 5, 4, 4, 3, 3, 5, 3, 6, 5, 2, 2, 5, 4, 4, 2, 6, 5, 4, 4, 6, 3, 5, 3, 5, 4, 3, 3, 4, 3, 3, 1, 7, 6, 5, 5, 4, 4, 6, 4, 7, 3, 3, 3, 6, 5, 5, 3, 7, 6, 5, 5, 5, 2, 4
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
The leaders of weakly decreasing runs in a sequence are obtained by splitting it into maximal weakly decreasing subsequences and taking the first term of each.
The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.
|
|
LINKS
|
|
|
EXAMPLE
|
The maximal weakly decreasing subsequences of the 1234567th composition in standard order are ((3,2,1),(2,2,1),(2),(5,1,1,1)), so a(1234567) is 3+2+2+5 = 12.
|
|
MATHEMATICA
|
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n, 2]], 1], 0]]//Reverse;
Table[Total[First/@Split[stc[n], GreaterEqual]], {n, 0, 100}]
|
|
CROSSREFS
|
For length instead of sum we have A124765.
Counting compositions by this statistic gives A374748, opposite A374637.
A373949 counts compositions by run-compressed sum.
All of the following pertain to compositions in standard order:
- Constant compositions are ranked by A272919.
- Run-compression transform is A373948.
Cf. A065120, A106356, A188920, A189076, A238343, A333175, A333213, A373949, A373954, A374631, A374633, A374635, A374701, A374742.
|
|
KEYWORD
|
nonn,new
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|