A036156 5^n mod 193.
1, 5, 25, 125, 46, 37, 185, 153, 186, 158, 18, 90, 64, 127, 56, 87, 49, 52, 67, 142, 131, 76, 187, 163, 43, 22, 110, 164, 48, 47, 42, 17, 85, 39, 2, 10, 50, 57, 92, 74, 177, 113, 179, 123, 36, 180, 128, 61, 112
Offset: 0
References
- I. M. Vinogradov, Elements of Number Theory, pp. 220 ff.
Programs
-
Maple
[ seq(primroot(ithprime(i))^j mod ithprime(i),j=0..100) ];
-
Mathematica
PowerMod[5,Range[0,50],193] (* Harvey P. Dale, May 22 2016 *)
-
PARI
a(n)=lift(Mod(5,193)^n) \\ Charles R Greathouse IV, Mar 22 2016