A262099 Primes p such that 2^p + 17 is also prime.
13, 769, 4441, 184189
Offset: 1
Examples
13 is in sequence because 2^13 + 17 = 8209 is prime.
Programs
-
Magma
[p: p in PrimesUpTo(1000) | IsPrime(2^p+17)];
-
Mathematica
Select[Prime[Range[1000]], PrimeQ[2^# + 17] &]
-
PARI
for(n=1, 1e3, if(isprime((2^prime(n))+17), print1(prime(n)", "))) \\ Altug Alkan, Sep 18 2015
Comments