login
A069980
(Sum of digits of n)^6 - (sum of digits of n^6).
0
0, 0, 54, 711, 4077, 15606, 46629, 117621, 262125, 531423, 0, 36, 684, 4059, 15588, 46629, 117612, 262107, 531423, 999963, 54, 693, 4059, 15579, 46620, 117621, 262098, 531396, 999963, 1771524, 711, 4050, 15588, 46602, 117612, 262098
OFFSET
0,3
COMMENTS
a(n) = 0 iff n is a power of ten.
MATHEMATICA
f[n_] := Plus @@ IntegerDigits[n]^6 - Plus @@ (IntegerDigits[n^6]); Table[ f[n], {n, 0, 100}]
CROSSREFS
Sequence in context: A218130 A321635 A090835 * A139178 A288838 A157094
KEYWORD
base,easy,nonn
AUTHOR
STATUS
approved