%I #5 Nov 21 2013 12:48:58
%S 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,
%T 60,67,74,82,91,102,113,125,139,155,172,191,212,236,262,291,324,360,
%U 400,444,493,548,609,677,752,835,928,1031,1146,1273,1415,1572
%N a(1)=4; a(n)=floor((39+sum(a(1) to a(n-1)))/9).
%t Module[{ll={4}},Do[AppendTo[ll,Floor[(39+Total[ll])/9]],{60}];ll] (* _Harvey P. Dale_, May 07 2012 *)
%Y Cf. A073941, A112088, A072493.
%K nonn
%O 1,1
%A _Graeme McRae_, Jun 10 2006
%E More terms from Harvey P. Dale, May 07 2012