login
A323147
Numbers k such that 437*2^k+1 is prime.
0
23, 83, 467, 2267, 64835, 105599, 2769299, 2803775
OFFSET
1,1
MAPLE
select(k->isprime(437*2^k+1), [$1..3000]); # Muniru A Asiru, Jan 05 2019
MATHEMATICA
Select[Range[1000], PrimeQ[437*2^# + 1] &]
CROSSREFS
Sequence in context: A142790 A288340 A316378 * A262119 A104068 A304839
KEYWORD
nonn,more,hard
AUTHOR
Robert Price, Jan 05 2019
EXTENSIONS
a(7)-a(8) from Jeppe Stig Nielsen, Dec 27 2019
STATUS
approved