Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A167502
Sequence A167500 (= list of nonzero bits in this sequence), written in binary.
6
1, 10, 100, 111, 1000, 1001, 1010, 1110, 10001, 10010, 10100, 10110, 10111, 11000, 11010, 11110, 11111, 100010, 100100, 100110, 101001, 101011, 101100, 101110, 110000, 110001, 110010, 110011, 110100, 111000, 111001, 111011, 111101, 111110
OFFSET
1,2
FORMULA
EXAMPLE
Sequence A167500 starts 1,2,4,7,... = 1,10,100,111,.... when written in binary.
PROG
(PARI) a=b=[]; for(n=1, 30, #b >= n & for( i=a[n-1]+1, #b, b[i] & (a=concat(a, i)) & break); #a<n & a=concat(a, #b+1); b=concat(b, binary( a[n] ))); apply(t->subst(Pol(binary(t)), x, 10), a)
CROSSREFS
Cf. A167500 (this sequence written in decimal), A167501 (the digits of this sequence).
Sequence in context: A099820 A273245 A276349 * A135652 A035504 A072366
KEYWORD
base,nonn
AUTHOR
M. F. Hasler, Nov 05 2009
STATUS
approved