login
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
OFFSET
1,1
LINKS
A. Frank & P. Jacqueroux, International Contest, 2001. Item 24
FORMULA
a(n) = A062028(A000578(n)). - Michel Marcus, Dec 02 2013
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
Sequence in context: A230937 A018951 A019064 * A327542 A166154 A034507
KEYWORD
nonn,base
AUTHOR
Herman Jamke (hermanjamke(AT)fastmail.fm), Sep 30 2006
STATUS
approved