login
a(n) = a(n-1) + sum of decimal digits of n!.
0

%I #5 Oct 15 2013 22:31:20

%S 1,3,9,15,18,27,36,45,72,99,135,162,189,234,279,342,405,459,504,558,

%T 621,693,792,873,945,1026,1134,1224,1350,1467,1602,1710,1854,1998,

%U 2142,2313,2466,2574,2763,2952,3096,3285,3465,3681,3888,4104,4329,4563,4788

%N a(n) = a(n-1) + sum of decimal digits of n!.

%t s=0; Do[s=s+Apply[Plus, IntegerDigits[n! ]]; Print[s], {n, 1, 128}]

%Y Cf. A037123, A000788, A051351.

%K base,easy,nonn

%O 1,2

%A _Labos Elemer_, May 27 2002