OFFSET
1,1
COMMENTS
a(6), if it exists, is greater than 9000. - Ryan Propper, May 17 2006
a(6), if it exists, is greater than 20000. - Michael S. Branicky, Aug 11 2024
MATHEMATICA
Select[Range[80], PrimeQ[#^#-(#-1)^2]&] (* Harvey P. Dale, Aug 15 2013 *)
PROG
(PARI) is(n)=ispseudoprime(n^n-(n-1)^2) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Jason Earls, May 23 2004
STATUS
approved