login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A069964
a(n) = (sum of digits of n)^4 - (sum of digits^4 of n).
0
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 14, 64, 174, 368, 670, 1104, 1694, 2464, 3438, 0, 64, 224, 528, 1024, 1760, 2784, 4144, 5888, 8064, 0, 174, 528, 1134, 2064, 3390, 5184, 7518, 10464, 14094, 0, 368, 1024, 2064, 3584, 5680, 8448, 11984, 16384, 21744, 0, 670
OFFSET
0,12
COMMENTS
a(n) = 0 iff n is a single-digit number or is a power of ten times a single-digit number.
MATHEMATICA
f[n_] := Plus @@ IntegerDigits[n]^4 - Plus @@ (IntegerDigits[n]^4); Table[ f[n], {n, 0, 100}]
CROSSREFS
Sequence in context: A275179 A050396 A344597 * A275127 A074354 A212743
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved