| 1, 3, 9, 15, 18, 27, 36, 45, 72, 99, 135, 162, 189, 234, 279, 342, 405, 459, 504, 558, 621, 693, 792, 873, 945, 1026, 1134, 1224, 1350, 1467, 1602, 1710, 1854, 1998, 2142, 2313, 2466, 2574, 2763, 2952, 3096, 3285, 3465, 3681, 3888, 4104, 4329, 4563, 4788
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
s=0; Do[s=s+Apply[Plus, IntegerDigits[n! ]]; Print[s], {n, 1, 128}]
|
|
CROSSREFS
|
Cf. A037123, A000788, A051351.
Sequence in context: A062220 A043381 A100331 this_sequence A071347 A093414 A123998
Adjacent sequences: A071120 A071121 A071122 this_sequence A071124 A071125 A071126
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), May 27 2002
|
|
