A374685 Numbers k such that the leaders of strictly increasing runs in the k-th composition in standard order are identical.
0, 1, 2, 3, 4, 6, 7, 8, 10, 12, 13, 14, 15, 16, 20, 24, 25, 27, 28, 29, 30, 31, 32, 36, 40, 42, 48, 49, 51, 52, 54, 55, 56, 57, 59, 60, 61, 62, 63, 64, 72, 80, 82, 84, 96, 97, 99, 102, 103, 104, 105, 108, 109, 110, 111, 112, 113, 115, 116, 118, 119, 120, 121
Offset: 1
Keywords
Examples
The maximal strictly increasing subsequences of the 6560th composition in standard order are ((1,3),(1,2,6)), with leaders (1,1), so 6560 is in the sequence. The terms together with corresponding compositions begin: 0: () 1: (1) 2: (2) 3: (1,1) 4: (3) 6: (1,2) 7: (1,1,1) 8: (4) 10: (2,2) 12: (1,3) 13: (1,2,1) 14: (1,1,2) 15: (1,1,1,1) 16: (5) 20: (2,3) 24: (1,4) 25: (1,3,1) 27: (1,2,1,1) 28: (1,1,3) 29: (1,1,2,1) 30: (1,1,1,2) 31: (1,1,1,1,1)
Links
Crossrefs
Positions of constant rows in A374683.
Compositions of this type are counted by A374686.
A011782 counts compositions.
A374748 counts compositions by sum of leaders of weakly decreasing runs.
All of the following pertain to compositions in standard order:
- Length is A000120.
- Parts are listed by A066099.
- Run-length transform is A333627.
Programs
-
Mathematica
stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse; Select[Range[0,100],SameQ@@First/@Split[stc[#],Less]&]
Comments