|
| |
|
|
A069939
|
|
1/3!*((Sum of digits of n)^3 + 3*(Sum of digits of n)*(Sum of digits^2 of n) + 2*(Sum of digits^3 of n)).
|
|
0
| |
|
|
0, 1, 8, 27, 64, 125, 216, 343, 512, 729, 1, 4, 15, 40, 85, 156, 259, 400, 585, 820, 8, 15, 32, 65, 120, 203, 320, 477, 680, 935, 27, 40, 65, 108, 175, 272, 405, 580, 803, 1080, 64, 85, 120, 175, 256, 369, 520, 715, 960, 1261, 125, 156, 203, 272, 369, 500, 671
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
MATHEMATICA
| sdn[n_]:=Module[{c=1/3!, idn=IntegerDigits[n], sdn}, sdn=Total[idn]; c(sdn^3+ 3sdn Total[idn^2]+2Total[idn^3])]; Array[sdn, 60, 0] (* From Harvey P. Dale, Dec 29 2011 *)
|
|
|
CROSSREFS
| Cf. A007953, A003132, A055012, A069816.
Sequence in context: A126200 A076989 A055012 * A118880 A048390 A000578
Adjacent sequences: A069936 A069937 A069938 * A069940 A069941 A069942
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Vladeta Jovovic (vladeta(AT)eunet.rs), May 04 2002
|
| |
|
|
