OFFSET
1,1
COMMENTS
No further terms <= 100000. - Michael S. Branicky, Aug 28 2024
MATHEMATICA
Select[Range[3000], PrimeQ[#^7*2^# - 1] &] (* Amiram Eldar, Nov 23 2023 *)
PROG
(Magma) [k: k in [1..4000] | IsPrime(k^7*2^k-1)];
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Juri-Stepan Gerasimov, Nov 22 2023
EXTENSIONS
a(16)-a(21) from Michael S. Branicky, Nov 23 2023
STATUS
approved