OFFSET
0,4
COMMENTS
All terms belong to A075926.
LINKS
Rémy Sigrist, Table of n, a(n) for n = 0..32768
FORMULA
EXAMPLE
PROG
(PARI) a(n) = { my (m=n, x=0); while (m, my (v=valuation(m, 2)); x=bitxor(x, v+1); m-=2^v); if (x, bitxor(n, 2^(x-1)), n) }
CROSSREFS
KEYWORD
AUTHOR
Rémy Sigrist, Feb 08 2021
STATUS
approved