|
|
A069979
|
|
(Sum of digits of n)^5 - (sum of digits of n^5).
|
|
0
|
|
|
0, 0, 27, 234, 1017, 3114, 7749, 16785, 32742, 59022, 0, 18, 216, 999, 3096, 7740, 16776, 32733, 59004, 99963, 27, 225, 999, 3096, 7740, 16767, 32733, 59013, 99972, 161028, 234, 990, 3096, 7740, 16776, 32733, 59013, 99954, 161010, 248796, 1017
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
a(n) = 0 iff n is a power of ten.
|
|
LINKS
|
|
|
MATHEMATICA
|
f[n_] := Plus @@ IntegerDigits[n]^5 - Plus @@ (IntegerDigits[n^5]); Table[ f[n], {n, 0, 100}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|