OFFSET
1,2
LINKS
Ivan Neretin, Table of n, a(n) for n = 1..10000
MATHEMATICA
a = used = {}; Do[k = 1; While[MemberQ[a, k] || MemberQ[used, x = BitXor[k, n]], k++]; AppendTo[a, k]; AppendTo[used, x], {n, 72}]; a
CROSSREFS
KEYWORD
nonn
AUTHOR
Ivan Neretin, Mar 06 2016
STATUS
approved