OFFSET
0,3
COMMENTS
For n>0, periodic with period 20 = A174824(5): repeat [1, 4, 2, 1, 0, 1, 3, 1, 4, 0, 1, 1, 3, 1, 0, 1, 2, 4, 4, 0].
LINKS
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, 1).
MATHEMATICA
Table[PowerMod[n, n, 5], {n, 0, 140}]
Join[{1}, LinearRecurrence[{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1}, {1, 4, 2, 1, 0, 1, 3, 1, 4, 0, 1, 1, 3, 1, 0, 1, 2, 4, 4, 0}, 86]] (* Ray Chandler, Aug 26 2015 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
José María Grau Ribas, Jan 18 2012
STATUS
approved