A159022 a(0)=29; a(n) = a(n-1) + floor(sqrt(a(n-1))), n > 0.
29, 34, 39, 45, 51, 58, 65, 73, 81, 90, 99, 108, 118, 128, 139, 150, 162, 174, 187, 200, 214, 228, 243, 258, 274, 290, 307, 324, 342, 360, 378, 397, 416, 436, 456, 477, 498, 520, 542, 565, 588, 612, 636, 661, 686, 712, 738, 765, 792, 820, 848, 877, 906, 936, 966, 997, 1028
Offset: 0
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
Programs
-
Mathematica
NestList[#+Floor[Sqrt[#]]&,29,60] (* Harvey P. Dale, Aug 26 2019 *)
Extensions
More terms from Vincenzo Librandi, Apr 10 2009
Comments