OFFSET
1,1
COMMENTS
A prime p is in the sequence if and only if p-1 is in A057732.
EXAMPLE
For p = 2, 2^(p-1)+3 = 5 is prime.
For p = 17, 2^(p-1)+3 = 65539 is prime.
For p = 31, 2^(p-1)+3 = 1073741827 is prime.
MATHEMATICA
Select[Prime[Range[3000]], PrimeQ[2^(# - 1) + 3] &] (* Vincenzo Librandi, Jun 09 2015 *)
PROG
(Magma) [p: p in PrimesUpTo(2000) | IsPrime(2^(p-1) + 3)]; // Vincenzo Librandi, Jun 09 2015
CROSSREFS
KEYWORD
nonn,more,hard
AUTHOR
Vincenzo Librandi, Dec 28 2008
EXTENSIONS
Edited and a(13)-a(15) (based on A057732) added by Klaus Brockhaus, Jan 06 2009
a(16) from Vincenzo Librandi, Jun 09 2015
a(17) from Amiram Eldar, Aug 01 2024
STATUS
approved