login
A262201
Prime p such that 2^p + 33 is also prime.
1
2, 3, 11, 1499, 2039
OFFSET
1,1
COMMENTS
a(6) > 203018.
A000040 INTERSECT A247953.
EXAMPLE
For p=3, 2^3 + 33 = 41, which is prime.
MATHEMATICA
Select[Prime[Range[100000]], PrimeQ[(2^# + 33)] &]
PROG
(Magma) [p: p in PrimesUpTo(1000) | IsPrime(2^p+33)]; // Vincenzo Librandi, Oct 05 2015
(PARI) forprime(p=2, 10000, if (isprime(2^p + 33), print1(p", "))); \\ Altug Alkan, Oct 05 2015
CROSSREFS
Cf. A157007.
Cf. similar sequences of the type "Primes p such that 2^p + k" listed in A262098.
Sequence in context: A109809 A211349 A096456 * A072928 A140970 A058523
KEYWORD
nonn,more
AUTHOR
Robert Price, Oct 04 2015
STATUS
approved