OFFSET
0,4
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..10000
MATHEMATICA
Table[BitXor[n (n + 1)/2, n], {n, 0, 100}] (* Vladimir Joseph Stephan Orlovsky, Jul 17 2011 *)
PROG
(PARI) a(n)=bitxor(n, n*(n+1)/2); \\ Michel Marcus, Jul 08 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, May 28 2010
STATUS
approved
