A261536 Primes p such that p^5 + 2 is also prime.
11, 149, 179, 197, 281, 317, 389, 401, 419, 491, 509, 587, 977, 1019, 1217, 1289, 1367, 1499, 1607, 1637, 2039, 2111, 2339, 2459, 2609, 2801, 2897, 3119, 3221, 3359, 3701, 3767, 3917, 4451, 4517, 4871, 5237, 5531, 5717, 5879, 5927, 6197, 6311, 6959, 7151
Offset: 1
Examples
11^5 + 2 = 161053 is a prime.
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Magma
[p: p in PrimesUpTo(12000) | IsPrime(p^5+2)];
-
Maple
filter:= proc(p) isprime(p) and isprime(p^5+2) end proc: select(filter, [seq(i,i=5..10000,6)]); # Robert Israel, Sep 22 2019
-
Mathematica
Select[Prime[Range[1000]], PrimeQ[#^5 + 2] &]
Comments