login
A323029
Numbers k such that 377*2^k+1 is prime.
0
11, 143, 619, 3859, 2452639
OFFSET
1,1
MAPLE
select(k->isprime(377*2^k+1), [$1..1000]); # Muniru A Asiru, Jan 02 2019
MATHEMATICA
Select[Range[1000], PrimeQ[377*2^# + 1] &] (* Robert Price, Jan 02 2019 *)
CROSSREFS
Sequence in context: A024141 A289216 A296057 * A221580 A024140 A029529
KEYWORD
nonn,more,hard
AUTHOR
Robert Price, Jan 02 2019
EXTENSIONS
a(5) from Jeppe Stig Nielsen, Jan 04 2020
STATUS
approved