[go: up one dir, main page]

login
A175480
a(1)=1. For n >= 1, if a(n) = 1, then append to the sequence the digits of binary n+1 (most significant digits first and least significant digits last). If a(n) = 0, 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, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 0, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 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], binary(n+1), Vecrev(binary(n+1)))))) \\ Rémy Sigrist, Nov 08 2018
CROSSREFS
Cf. A175479.
Sequence in context: A080813 A100672 A079559 * A285568 A014577 A157926
KEYWORD
base,nonn
AUTHOR
Leroy Quet, May 25 2010
EXTENSIONS
Definition fixed by Leroy Quet, May 28 2010
STATUS
approved