OFFSET
1,1
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
EXAMPLE
a(2) = a(93) = a(3371851) = 1;
prime(2) = 3; prime(93) = 487; prime(3371851) = 56598313.
MATHEMATICA
PowerMod[10, #-1 , #^2]&/@Prime[Range[50]] (* Harvey P. Dale, Feb 10 2016 *)
PROG
(Haskell)
import Math.NumberTheory.Moduli (powerMod)
a265012 n = powerMod 10 (p - 1) (p ^ 2) where p = a000040 n
(PARI) a(n) = lift(Mod(10, prime(n)^2)^(prime(n)-1)); \\ Michel Marcus, Jan 22 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Nov 30 2015
STATUS
approved