OFFSET
0,4
COMMENTS
a(n) = A022875(n) for 1 < n < 15.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
MATHEMATICA
nxt[{a_, b_, c_}]:={b, c, c+Floor[(a+b)/2]}; NestList[nxt, {1, 1, 1}, 50][[All, 1]] (* Harvey P. Dale, Jun 14 2020 *)
PROG
(Python)
ppp=prpr=prev=1
for n in range(65):
cur=prev+(prpr+ppp)//2
print(str(ppp), end=', ')
ppp, prpr, prev = prpr, prev, cur
CROSSREFS
KEYWORD
nonn
AUTHOR
Alex Ratushnyak, Jul 01 2012
STATUS
approved