OFFSET
0,2
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..44
MAPLE
map(convert, A068052, binary);
MATHEMATICA
Map[FromDigits[IntegerDigits[#, 2]] &, FoldList[BitXor[#, #*#2] &, 1, 2^Range[10]]] (* Paolo Xausa, Mar 07 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Feb 13 2002
STATUS
approved