OFFSET
1,2
LINKS
Ray Ballinger, Proth Search Page
Ray Ballinger and Wilfrid Keller, List of primes k.2^n + 1 for 300 < k < 600
Wilfrid Keller, List of primes k.2^n - 1 for k < 300
Eric Weisstein's World of Mathematics, Proth Prime
MAPLE
select(n->isprime(321*2^n+1), [$1..1000]); # Muniru A Asiru, Dec 31 2018
MATHEMATICA
Select[Range[1000], PrimeQ[321*2^# + 1] &] (* Robert Price, Dec 31 2018 *)
CROSSREFS
KEYWORD
nonn,more,hard,changed
AUTHOR
Robert Price, Dec 31 2018
EXTENSIONS
a(30) from Jeppe Stig Nielsen, Dec 20 2024
STATUS
approved