OFFSET
1,1
COMMENTS
a(12) > 100000. - Dana Jacobsen, Oct 03 2015
a(12) > 382198 using A057196. - Michael S. Branicky, Oct 31 2024
EXAMPLE
5 is in sequence because 2^5 + 9 = 41 is prime.
MATHEMATICA
Select[Prime[Range[1000]], PrimeQ[2^# + 9] &]
PROG
(Magma) [p: p in PrimesUpTo(1000) | IsPrime(2^p+9)];
(PARI) for(n=1, 1e3, if(isprime((2^prime(n))+9), print1(prime(n)", "))) \\ Altug Alkan, Sep 18 2015
(Perl) use ntheory ":all"; use Math::GMP qw/:constant/; forprimes { say if is_prime(2**$_+9) } 10000; # Dana Jacobsen, Oct 03 2015
CROSSREFS
KEYWORD
nonn,more,changed
AUTHOR
Vincenzo Librandi, Sep 18 2015
STATUS
approved