login
A175479
a(1)=1. For n >= 1, if a(n) = 0, then append to the sequence the digits of binary n+1 (most significant digits first and least significant digits last). If a(n) = 1, then append to the sequence the digits of binary n+1 in reverse order (least significant digits first and most significant digits last).
2
1, 0, 1, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0
OFFSET
1,1
LINKS
PROG
(PARI) a=[1]; for (n=1, 84, print1 (a[n] ", "); if (#a<84, a=concat(a, if (a[n], Vecrev(binary(n+1)), binary(n+1))))) \\ Rémy Sigrist, Nov 08 2018
CROSSREFS
Cf. A175480.
Sequence in context: A282343 A099076 A282339 * A307243 A120530 A078616
KEYWORD
base,nonn
AUTHOR
Leroy Quet, May 25 2010
EXTENSIONS
Definition fixed by Leroy Quet, May 28 2010
STATUS
approved