OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..1661
MATHEMATICA
Table[PowerMod[5, n, 4^n], {n, 0, 50}] (* G. C. Greubel, Oct 01 2017 *)
PROG
(PARI) concat([0], vector(50, n, lift(Mod(5, 4^n)^n))) \\ Michel Marcus, Oct 02 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, May 20 2008
STATUS
approved