A243239 a(n) = 10^n mod 97.
1, 10, 3, 30, 9, 90, 27, 76, 81, 34, 49, 5, 50, 15, 53, 45, 62, 38, 89, 17, 73, 51, 25, 56, 75, 71, 31, 19, 93, 57, 85, 74, 61, 28, 86, 84, 64, 58, 95, 77, 91, 37, 79, 14, 43, 42, 32, 29, 96, 87, 94, 67, 88, 7, 70, 21, 16, 63, 48, 92, 47, 82, 44, 52, 35, 59, 8, 80, 24, 46, 72, 41, 22, 26, 66, 78, 4, 40, 12, 23, 36, 69, 11, 13, 33, 39, 2, 20, 6, 60, 18, 83, 54, 55, 65, 68
Offset: 0
Examples
For n=6, a(6)=27.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Modexp(10, n, 97): n in [0..100]]; // Bruno Berselli, Mar 22 2016
-
Maple
[seq(10^n mod 97, n=0..200)]; # N. J. A. Sloane, Jun 25 2014
-
Mathematica
Table[PowerMod[10, n, 97], {n, 0, 100}] (* Vincenzo Librandi, Jun 26 2014 *) -
PARI
a(n)=lift(Mod(10,97)^n) \\ Charles R Greathouse IV, Mar 22 2016
-
Sage
[power_mod(10,n,97) for n in (0..100)] # Bruno Berselli, Jun 26 2014
Extensions
Changed offset; made it into an infinite sequence. - N. J. A. Sloane, Jun 25 2014
Comments