A066440 a(n) = 9^n mod n.

0, 1, 0, 1, 4, 3, 2, 1, 0, 1, 9, 9, 9, 11, 9, 1, 9, 9, 9, 1, 15, 15, 9, 9, 24, 3, 0, 9, 9, 21, 9, 1, 3, 13, 4, 9, 9, 5, 27, 1, 9, 15, 9, 5, 9, 35, 9, 33, 30, 1, 15, 9, 9, 27, 34, 25, 45, 23, 9, 21, 9, 19, 36, 1, 29, 9, 9, 33, 39, 51, 9, 9, 9, 7, 24, 25, 4, 27, 9, 1

Offset

1,5

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Maple

seq(irem(9^n, n), n=1..80); # Zerinvary Lajos, Apr 20 2008

Mathematica

Table[PowerMod[9, n, n], {n, 80} ]

Prog

(PARI) { for (n=1, 1000, write("b066440.txt", n, " ", 9^n % n) ) } \\ Harry J. Smith, Feb 14 2010

Crossrefs

Sequence in context: A022960 A023446 A258447 * A182425 A071692 A307335

Adjacent sequences: A066437 A066438 A066439 * A066441 A066442 A066443

Keyword

nonn

Author

Robert G. Wilson v, Dec 27 2001

Status

approved