|
0, 1, 2, 3, 5, 4, 6, 7, 11, 10, 9, 13, 8, 12, 14, 15, 23, 22, 21, 19, 20, 18, 27, 17, 26, 25, 29, 16, 24, 28, 30, 31, 47, 46, 45, 43, 44, 42, 39, 41, 38, 37, 55, 40, 36, 54, 35, 53, 34, 51, 59, 52, 50, 33, 49, 58, 57, 61, 32, 48, 56, 60, 62, 63, 95, 94, 93, 91
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(0)=0, a(1)=1, and thereafter, if A079559(n)=0, a(n) = 2*a(A234017(n)), else a(n) = 1+(2*a(A213714(n)-1)).
a(n) = A054429(A233275(n)). [Follows from the definitions of these sequences]
|
|
PROG
|
(Scheme, with memoizing definec-macro from Antti Karttunen's IntSeq-library)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|