A120209 a(1)=8; a(n)=floor((79+sum(a(1) to a(n-1)))/9).

8, 9, 10, 11, 13, 14, 16, 17, 19, 21, 24, 26, 29, 32, 36, 40, 44, 49, 55, 61, 68, 75, 84, 93, 103, 115, 127, 142, 157, 175, 194, 216, 240, 266, 296, 329, 365, 406, 451, 501, 557, 619, 688, 764, 849, 943, 1048, 1164, 1294, 1438, 1597, 1775, 1972, 2191, 2435, 2705, 3006, 3340, 3711

Offset: 1

Author

Graeme McRae, Jun 10 2006

Keywords

• nonn

Crossrefs

Cf. A073941, A112088, A072493.

Programs

Mathematica

nxt[{t_,a_}]:=Module[{c=Floor[(79+t)/9]},{t+c,c}]; NestList[nxt,{8,8},60][[;;,2]] (* Harvey P. Dale, May 03 2024 *)

Extensions

More terms from Alonso del Arte, Dec 25 2013