A159263 a(0)=181; for n > 0, a(n) = a(n-1) + floor(sqrt a(n-1)).

181, 194, 207, 221, 235, 250, 265, 281, 297, 314, 331, 349, 367, 386, 405, 425, 445, 466, 487, 509, 531, 554, 577, 601, 625, 650, 675, 700, 726, 752, 779, 806, 834, 862, 891, 920, 950, 980, 1011, 1042, 1074, 1106, 1139, 1172, 1206, 1240, 1275, 1310, 1346

Offset: 0

Author

Philippe Deléham, Apr 07 2009

Keywords

• nonn

Comments

Row 12 in square array A159016. This sequence contains infinitely many squares.

Links

• G. C. Greubel, Table of n, a(n) for n = 0..5000

Crossrefs

Cf. A159016.

Programs

Mathematica

RecurrenceTable[{a[n]==a[n-1] + Floor[Sqrt[a[n-1]]], a[0] == 181}, a, {n, 0, 50}] (* G. C. Greubel, Jun 28 2018 *)