A120201 a(1)=8; a(n)=floor((71+sum(a(1) to a(n-1)))/8).

8, 9, 11, 12, 13, 15, 17, 19, 21, 24, 27, 30, 34, 38, 43, 49, 55, 62, 69, 78, 88, 99, 111, 125, 141, 158, 178, 200, 225, 253, 285, 321, 361, 406, 457, 514, 578, 650, 731, 823, 926, 1041, 1172, 1318, 1483, 1668, 1877, 2111, 2375, 2672, 3006, 3382, 3805, 4280

Offset: 1

Author

Graeme McRae, Jun 10 2006

Keywords

• nonn

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A073941, A112088, A072493.

Programs

Mathematica

nxt[{s_,a_}]:=Module[{c=Floor[(s+71)/8]},{s+c,c}]; NestList[nxt,{8,8},50][[All,2]] (* Harvey P. Dale, May 04 2017 *)

Extensions

More terms from Harvey P. Dale, May 04 2017