OFFSET
1,1
COMMENTS
a(5) > 5*10^5. - Robert Price, Sep 18 2015
EXAMPLE
13 is in sequence because 2^13 + 17 = 8209 is prime.
MATHEMATICA
Select[Prime[Range[1000]], PrimeQ[2^# + 17] &]
PROG
(Magma) [p: p in PrimesUpTo(1000) | IsPrime(2^p+17)];
(PARI) for(n=1, 1e3, if(isprime((2^prime(n))+17), print1(prime(n)", "))) \\ Altug Alkan, Sep 18 2015
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Vincenzo Librandi, Sep 18 2015
STATUS
approved