A116609 a(n) = 13^n mod n.

0, 1, 1, 1, 3, 1, 6, 1, 1, 9, 2, 1, 0, 1, 7, 1, 13, 1, 13, 1, 13, 15, 13, 1, 18, 13, 1, 1, 13, 19, 13, 1, 19, 33, 27, 1, 13, 17, 13, 1, 13, 1, 13, 5, 28, 31, 13, 1, 48, 49, 4, 13, 13, 1, 32, 1, 31, 53, 13, 1, 13, 45, 55, 1, 13, 31, 13, 1, 58, 29, 13, 1, 13, 21, 7

Offset: 1

Author

Zak Seidov, Feb 19 2006

Keywords

• nonn

Examples

			a(5)=3 because 13^5 = 371293 = 3 mod 5.
		

Links

• Paul Tek, Table of n, a(n) for n = 1..10000

Programs

Mathematica

Table[PowerMod[13,k,k],{k,200}]

PARI

a(n) = { lift(Mod(13, n)^n) } \\ G. C. Greubel, Oct 28 2017