|
|
A123135 |
|
a(n) = n^3 plus sum of digits of n^3. |
|
2 |
|
|
2, 16, 36, 74, 133, 225, 353, 520, 747, 1001, 1339, 1746, 2216, 2761, 3393, 4115, 4930, 5850, 6887, 8008, 9279, 10667, 12184, 13842, 15644, 17602, 19710, 21971, 24415, 27009, 29819, 32794, 35964, 39323, 42901, 46683, 50672, 54898, 59346, 64010 (list; graph; refs; listen; history; text; internal format) |
|
|
OFFSET |
1,1
|
|
LINKS |
|
|
FORMULA |
|
|
EXAMPLE |
a(4) = 4^3 + sum of digits of 4^3 = 64 + (6 + 4) = 74.
|
|
MATHEMATICA |
#+Total[IntegerDigits[#]]&/@(Range[40]^3) (* Harvey P. Dale, Nov 06 2019 *)
|
|
PROG |
(PARI) a(n) = my(d = digits(n^3)); n^3 + sum(i=1, #d, d[i]); \\ Michel Marcus, Dec 02 2013
|
|
CROSSREFS |
|
|
KEYWORD |
nonn,base
|
|
AUTHOR |
Herman Jamke (hermanjamke(AT)fastmail.fm), Sep 30 2006
|
|
STATUS |
approved
|
|
|
|