A120205 a(1) = 4; a(n) = floor((39 + Sum_{i=1..n-1} a(i))/9).

4, 4, 5, 5, 6, 7, 7, 8, 9, 10, 11, 12, 14, 15, 17, 19, 21, 23, 26, 29, 32, 35, 39, 44, 49, 54, 60, 67, 74, 82, 91, 102, 113, 125, 139, 155, 172, 191, 212, 236, 262, 291, 324, 360, 400, 444, 493, 548, 609, 677, 752, 835, 928, 1031, 1146, 1273, 1415, 1572

Offset: 1

Author

Graeme McRae, Jun 10 2006

Keywords

• nonn
• changed

Crossrefs

Cf. A073941, A112088, A072493.

Programs

Mathematica

Module[{ll={4}},Do[AppendTo[ll,Floor[(39+Total[ll])/9]],{60}];ll] (* Harvey P. Dale, May 07 2012 *)

Extensions

More terms from Harvey P. Dale, May 07 2012