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