OFFSET
1,5
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..1000
EXAMPLE
a(7) = 4 as 4^7 = 16384 = 7*2340 + 4.
MAPLE
seq(irem(4^n, n), n=1..75); # Zerinvary Lajos, Apr 20 2008
MATHEMATICA
Table[PowerMod[4, i, i], {i, 50}]
PROG
(PARI) { for (n=1, 1000, write("b066602.txt", n, " ", 4^n % n) ) } \\ Harry J. Smith, Mar 09 2010
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Dec 22 2001
EXTENSIONS
More terms from Harvey P. Dale and Robert G. Wilson v, Dec 23 2001
STATUS
approved