|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
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).
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|