OFFSET
1,1
EXAMPLE
Given that 23 is the 9th prime, take 9*10 + 23 = 113, a prime.
MAPLE
a:=proc(n) if isprime(n*(n+1)+ithprime(n))=true then n else fi end: seq(a(n), n=1..270); # Emeric Deutsch, May 05 2007
MATHEMATICA
Select[Range[300], PrimeQ[#(#+1)+Prime[#]]&] (* Harvey P. Dale, Mar 18 2018 *)
PROG
(PARI) isok(n) = isprime(prime(n)+n+n^2); \\ Michel Marcus, Mar 13 2016
CROSSREFS
KEYWORD
nonn,less
AUTHOR
J. M. Bergot, Apr 27 2007
EXTENSIONS
Corrected and extended by Emeric Deutsch, May 05 2007
STATUS
approved