OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..1048
EXAMPLE
a(12) = 1^12 + 2^12 = 1 + 4096 = 4097.
MAPLE
a:= n-> add(i^n, i=convert(n, base, 10)):
seq(a(n), n=0..29); # Alois P. Heinz, Dec 18 2022
MATHEMATICA
Join[{1}, Table[Total[IntegerDigits[n]^n], {n, 25}]] (* Harvey P. Dale, Jul 16 2011 *)
CROSSREFS
KEYWORD
AUTHOR
Henry Bottomley, Jun 19 2000
STATUS
approved