OFFSET
1,2
MATHEMATICA
Select[Range[2000], PrimeQ[#^5*2^# + 1] &] (* Amiram Eldar, Nov 18 2023 *)
PROG
(Magma) [k: k in [1..1000] | IsPrime(k^5*2^k+1)];
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Juri-Stepan Gerasimov, Nov 18 2023
EXTENSIONS
a(10)-a(12) from Michael S. Branicky, Nov 18 2023
a(13)-a(14) from Michael S. Branicky, Aug 26 2024
STATUS
approved