A036142 3^n mod 113.
1, 3, 9, 27, 81, 17, 51, 40, 7, 21, 63, 76, 2, 6, 18, 54, 49, 34, 102, 80, 14, 42, 13, 39, 4, 12, 36, 108, 98, 68, 91, 47, 28, 84, 26, 78, 8, 24, 72, 103, 83, 23, 69, 94, 56, 55, 52, 43, 16, 48, 31, 93, 53, 46, 25, 75, 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[3,Range[0,80],113] (* Harvey P. Dale, Jul 26 2023 *)
-
PARI
a(n)=lift(Mod(3,113)^n) \\ Charles R Greathouse IV, Mar 22 2016