A066442 a(n) = 12^n mod n.

0, 0, 0, 0, 2, 0, 5, 0, 0, 4, 1, 0, 12, 4, 3, 0, 12, 0, 12, 16, 6, 12, 12, 0, 7, 14, 0, 16, 12, 24, 12, 0, 12, 8, 3, 0, 12, 30, 12, 16, 12, 36, 12, 12, 27, 6, 12, 0, 19, 24, 45, 40, 12, 0, 23, 32, 18, 28, 12, 36, 12, 20, 27, 0, 12, 12, 12, 64, 3, 44, 12, 0, 12, 70, 18, 64, 45, 66, 12

Offset: 1

Author

Robert G. Wilson v, Dec 27 2001

Keywords

• nonn

Links

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

Programs

Mathematica

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

PARI

a(n) = { lift(Mod(12, n)^n) } \\ Harry J. Smith, Feb 14 2010