|
|
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
|
|
|
|