OFFSET
0,3
COMMENTS
Cyclic with period 100.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
FORMULA
a(n) = a(n-100). - Wesley Ivan Hurt, Jan 02 2024
MAPLE
a:= proc(n) local l; l:=[seq(add(k&^i mod 10, k=1..i) mod 10, i=0..99)]:
proc(n) l[1+irem(n, 100)] end
end():
seq(a(n), n=0..200); # Alois P. Heinz, Sep 26 2013
MATHEMATICA
Table[Mod[Sum[PowerMod[i, n, 10], {i, 1, n}], 10], {n, 0, 133}]
PROG
(PARI) a(n)=n%=100; lift(sum(k=1, n, Mod(k, 10)^n)) \\ Charles R Greathouse IV, Dec 13 2013
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
José María Grau Ribas, Sep 24 2013
STATUS
approved