OFFSET
0,3
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..449
FORMULA
a(0) = 0, a(n) = (a(n-1) OR n) * n, where OR is the bitwise logical inclusive-OR operator.
MATHEMATICA
a[0]=0; a[n_]:=n BitOr[a[n-1], n]; Array[a, 23, 0] (* Stefano Spezia, Apr 15 2022 *)
nxt[{n_, a_}]:={n+1, BitOr[a, n+1](n+1)}; NestList[nxt, {0, 0}, 30][[All, 2]] (* Harvey P. Dale, Feb 08 2023 *)
PROG
(Python)
a=0
for i in range(1, 51):
print(a)
a |= i
a *= i
(PARI) a(n) = if (n==0, 0, n*bitor(a(n-1), n)); \\ Michel Marcus, Apr 16 2022
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Alex Ratushnyak, Apr 20 2012
STATUS
approved