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