OFFSET
1,2
COMMENTS
Next term is >= 30000.
EXAMPLE
3 is in the sequence since (3+1)^(3-1) + 3 = 4^2 + 3 = 19 is prime.
MATHEMATICA
Select[Range[600], PrimeQ[(#+1)^(#-1)+#]&] (* The program generates the first eight terms of the sequence. *) (* Harvey P. Dale, Feb 07 2024 *)
PROG
(PARI) is(n)=isprime((n+1)^(n-1)+n) \\ Charles R Greathouse IV, Jun 06 2017
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Matevz Markovic, Feb 25 2014
STATUS
approved