OFFSET
1,1
COMMENTS
Some of the larger entries may only correspond to probable primes.
6279 is a term. - Alexander Adamchuk, Apr 09 2007
MATHEMATICA
Do[ If[ PrimeQ[ n^(n + 1) - (n + 1)^n], Print[n]], {n, 1, 2000}]
PROG
(PARI) is(n)=ispseudoprime(n^(n+1)-(n+1)^n) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Daniel Gronau (Daniel.Gronau(AT)gmx.de), Jun 30 2002
EXTENSIONS
Edited and extended by Robert G. Wilson v, Jul 02 2002
STATUS
approved