login
A261832
Numbers n such that prime(n)^3 + n is prime.
1
2, 4, 6, 24, 32, 34, 36, 84, 86, 88, 112, 172, 182, 200, 212, 240, 258, 290, 306, 320, 336, 360, 366, 396, 404, 406, 434, 480, 494, 504, 528, 536, 556, 558, 580, 612, 636, 718, 722, 732, 794, 906, 960, 966, 992, 994, 1008, 1020, 1116, 1132, 1176, 1184, 1186, 1212
OFFSET
1,1
LINKS
EXAMPLE
6 is in the list because prime(6)^3 + 6 = 13^3 + 6 = 2197 + 6 = 2203, which is prime.
24 is in the list because prime (24)^3 + 24 = 89^3 + 24 = 704969 + 24 = 704993, which is prime.
MAPLE
select(n -> isprime(ithprime(n)^3 + n), [seq(n, n=1..2000)]);
MATHEMATICA
Select[Range[2000], PrimeQ[Prime[#]^3 + #] &]
PROG
(PARI) for(n = 1, 2000, if(isprime(prime(n)^3 + n), print1(n, ", ")));
(Magma) [n : n in [1..2000] | IsPrime(NthPrime(n)^3 +n)];
CROSSREFS
KEYWORD
nonn
AUTHOR
K. D. Bajpai, Sep 02 2015
STATUS
approved