OFFSET
0,3
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
FORMULA
a(0)=0, a(1)=1, a(n) = a(n-1)*2 - floor(sqrt(a(n-2))).
MATHEMATICA
nxt[{a_, b_}]:={b, 2b-Floor[Sqrt[a]]}; NestList[nxt, {0, 1}, 40][[All, 1]] (* Harvey P. Dale, Apr 29 2017 *)
PROG
(Python)
import math
prpr = 0
prev = 1
for n in range(55):
. current = prev*2 - int(math.sqrt(prpr))
. print prpr,
. prpr = prev
. prev = current
CROSSREFS
KEYWORD
nonn
AUTHOR
Alex Ratushnyak, May 05 2012
STATUS
approved