login
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
OFFSET
0,3
COMMENTS
a(n) = 0 iff n is a power of ten.
MATHEMATICA
f[n_] := Plus @@ IntegerDigits[n]^5 - Plus @@ (IntegerDigits[n^5]); Table[ f[n], {n, 0, 100}]
CROSSREFS
Sequence in context: A126522 A273822 A027500 * A183806 A207104 A075548
KEYWORD
base,easy,nonn
AUTHOR
STATUS
approved