OFFSET
1,1
LINKS
K. D. Bajpai, Table of n, a(n) for n = 1..10000
EXAMPLE
a(1) = 59 is prime of the form 3^3 + 5^2 + 7.
a(2) = 5297 is prime of the form 17^3 + 19^2 + 23.
MAPLE
MATHEMATICA
Select[Table[p = Prime[n]; q = NextPrime[p]; r = NextPrime[q]; p^3 + q^2 + r, {n, 5000}], PrimeQ]
PROG
(Magma) [k: p in PrimesUpTo (3000) | IsPrime(k) where k is (p^3 + NextPrime(p)^2 + NextPrime(NextPrime(p)))];
(PARI) forprime(p=1, 5000, q=nextprime(p+1); r=nextprime(q+1); k=(p^3 + q^2 + r); if(isprime(k), print1(k, ", ")))
CROSSREFS
KEYWORD
nonn
AUTHOR
K. D. Bajpai, May 25 2015
STATUS
approved