A155779 Primes p such that 2^(p-1)+7 is prime.
3, 5, 7, 11, 17, 19, 29, 31, 79, 89, 127, 1889, 3511, 8971, 13331
Offset: 1
Keywords
Programs
-
Mathematica
Select[Prime[Range[15000]], PrimeQ[(2^(# - 1) + 7)] &] (* Vincenzo Librandi, Jun 24 2013 *)
Comments