OFFSET
0,2
COMMENTS
for n<12, a(n)=A180189(n).
FORMULA
a(0)=0, for n>0, a(n) = (a(n-1) XOR n) * (n+1).
MATHEMATICA
nxt[{n_, a_}]:={n+1, BitXor[a, n+1](n+2)}; NestList[nxt, {0, 0}, 30][[All, 2]] (* Harvey P. Dale, Nov 01 2017 *)
PROG
(Python)
a=0
for i in range(1, 55):
print a,
a ^= i
a *= i+1
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Alex Ratushnyak, Apr 28 2012
STATUS
approved