OFFSET
1,1
MATHEMATICA
Select[Range[2500], PrimeQ[#^5*2^# - 1] &] (* Amiram Eldar, Nov 19 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(24)-a(25) from Michael S. Branicky, Nov 18 2023
a(26)-a(28) from Michael S. Branicky, Aug 26 2024
STATUS
approved