Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A333255
Numbers k such that the k-th composition in standard order is strictly increasing.
46
0, 1, 2, 4, 6, 8, 12, 16, 20, 24, 32, 40, 48, 52, 64, 72, 80, 96, 104, 128, 144, 160, 192, 200, 208, 256, 272, 288, 320, 328, 384, 400, 416, 512, 544, 576, 640, 656, 768, 784, 800, 832, 840, 1024, 1056, 1088, 1152, 1280, 1296, 1312, 1536, 1568, 1600, 1664, 1680
OFFSET
1,3
COMMENTS
A composition of n is a finite sequence of positive integers summing to n. The k-th composition in standard order (row k of 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.
EXAMPLE
The sequence of positive terms together with the corresponding compositions begins:
1: (1) 128: (8) 656: (2,3,5)
2: (2) 144: (3,5) 768: (1,9)
4: (3) 160: (2,6) 784: (1,4,5)
6: (1,2) 192: (1,7) 800: (1,3,6)
8: (4) 200: (1,3,4) 832: (1,2,7)
12: (1,3) 208: (1,2,5) 840: (1,2,3,4)
16: (5) 256: (9) 1024: (11)
20: (2,3) 272: (4,5) 1056: (5,6)
24: (1,4) 288: (3,6) 1088: (4,7)
32: (6) 320: (2,7) 1152: (3,8)
40: (2,4) 328: (2,3,4) 1280: (2,9)
48: (1,5) 384: (1,8) 1296: (2,4,5)
52: (1,2,3) 400: (1,3,5) 1312: (2,3,6)
64: (7) 416: (1,2,6) 1536: (1,10)
72: (3,4) 512: (10) 1568: (1,4,6)
80: (2,5) 544: (4,6) 1600: (1,3,7)
96: (1,6) 576: (3,7) 1664: (1,2,8)
104: (1,2,4) 640: (2,8) 1680: (1,2,3,5)
MATHEMATICA
stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n, 2]], 1], 0]]//Reverse;
Select[Range[0, 1000], Less@@stc[#]&]
CROSSREFS
Strictly increasing runs are counted by A124768.
The normal case is A164894.
The weakly decreasing version is A114994.
The weakly increasing version is A225620.
The unequal version is A233564.
The equal version is A272919.
The strictly decreasing version is A333256.
Sequence in context: A064522 A036912 A306371 * A346729 A346311 A097921
KEYWORD
nonn
AUTHOR
Gus Wiseman, Mar 20 2020
STATUS
approved