OFFSET
1,1
COMMENTS
No other terms < 100000.
LINKS
MATHEMATICA
Select[Prime[Range[100]], PrimeQ[(23^#-1)/22]&]
PROG
(PARI) is(n)=ispseudoprime((23^n-1)/22) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
hard,nonn,more
AUTHOR
Robert Price, Jan 20 2012
EXTENSIONS
a(5)=121949 corresponds to a probable prime discovered by Paul Bourdelais, Oct 19 2017
a(6)=221411 corresponds to a probable prime discovered by Paul Bourdelais, Aug 04 2020
STATUS
approved