A282669 Prime numbers p > 3 such that 2^p - 9 is prime.
5, 11, 17, 251, 563, 21011
Offset: 1
Crossrefs
Prime terms of A059610.
Programs
-
Mathematica
Select[Prime[Range[3,565]],PrimeQ[2^#-9]&] (* The program generates the first five terms of the sequence. *) (* Harvey P. Dale, Aug 24 2024 *)
-
PARI
forprime(p=5, 10^5, W= 2^p-9; if(ispseudoprime(W), print1(p, ", ")))
Comments