OFFSET
1,1
COMMENTS
Larger terms correspond to probable primes.
LINKS
P. Bourdelais, A Generalized Repunit Conjecture
MATHEMATICA
Do[p=Prime[n]; If[PrimeQ[(37^p + 1)/38], Print[p]], {n, 1, 1000000}]
PROG
(PARI) is(n)=ispseudoprime((37^n+1)/38)
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Paul Bourdelais, Jul 29 2019
STATUS
approved