OFFSET
1,1
COMMENTS
The first two negative terms are a(99) = -239 and a(999) = -5966. - Giovanni Resta, Jun 07 2017
LINKS
Robert Israel, Table of n, a(n) for n = 1..1000
EXAMPLE
Take the differences of 1,5,18,30,... => 4,13,12,...
MAPLE
ds:= n -> convert(convert(n, base, 10), `+`):
f:= n -> add(ds(k^n), k=1..n):
A287894:= map(f, [$1..101]);
MATHEMATICA
s[n_] := Sum[Total@IntegerDigits[k^n], {k, n}]; Differences@ Array[s, 60] (* Giovanni Resta, Jun 07 2017 *)
CROSSREFS
KEYWORD
sign,base
AUTHOR
Marian Kraus, Jun 02 2017
STATUS
approved