| 1, 9, 18, 28, 36, 45, 55, 63, 81, 82, 90, 108, 127, 144, 162, 181, 198, 216, 244, 252, 270, 289, 306, 324, 343, 369, 396, 415, 441, 450, 478, 504, 531, 550, 576, 603, 622, 648, 675, 685, 711, 738, 766, 792, 810, 838, 855, 873, 901, 909, 927, 946, 981, 1008
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
s=0; Do[s=s+Apply[Plus, IntegerDigits[n^3]]; Print[s], {n, 1, 128}]
|
|
CROSSREFS
|
Cf. A037123, A000788, A051351, A071317.
Adjacent sequences: A071118 A071119 A071120 this_sequence A071122 A071123 A071124
Sequence in context: A052489 A115552 A043322 this_sequence A107223 A101424 A044433
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), May 27 2002
|
|
