OFFSET
1,1
FORMULA
a(n) = prime(A064711(n)). - Michel Marcus, Feb 04 2015
EXAMPLE
7 is in this sequence because 7+16=23.
19 is in this sequence because 19+64=83.
MATHEMATICA
Prime[Select[Range[500], PrimeQ[Prime[#] + #^2] &]]
PROG
(Magma) [NthPrime(n): n in [1..500] | IsPrime(NthPrime(n)+n^2)];
(PARI) lista(nn) = forprime (n=2, nn, if (isprime(n+primepi(n)^2), print1(n, ", "))); \\ Michel Marcus, Feb 04 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Feb 04 2015
STATUS
approved