OFFSET
0,4
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
MATHEMATICA
nxt[{n_, a_, b_}]:={n+1, b, Floor[b/(n+1)]+2a}; NestList[nxt, {1, 0, 1}, 50][[All, 2]] (* Harvey P. Dale, Sep 01 2022 *)
PROG
(Python)
prpr = 0
prev = 1
for n in range(2, 99):
. current = prev//n + prpr*2
. print prpr,
. prpr = prev
. prev = current
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Alex Ratushnyak, Apr 29 2012
STATUS
approved