OFFSET
1,1
COMMENTS
The corresponding primes are terms of A059055. - Bernard Schott, Aug 09 2019
MATHEMATICA
Do[p=Prime[n]; If[PrimeQ[(121^p + 1)/122], Print[p]], {n, 1, 1000000}]
PROG
(PARI) is(n)=ispseudoprime((121^n+1)/122)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Paul Bourdelais, Aug 06 2019
STATUS
approved