login
A032469
Numbers k such that 185*2^k+1 is a prime.
0
3, 21, 497, 707, 933, 963, 1187, 1337, 2633, 2993, 3963, 4947, 5177, 11883, 98627, 235673, 375723, 384747, 681393, 2235003
OFFSET
1,1
MAPLE
select(k->isprime(185*2^k+1), [$0..1000]); # Muniru A Asiru, Dec 18 2018
MATHEMATICA
Select[Range[1000], PrimeQ[185*2^# + 1] & ] (* Robert Price, Dec 18 2018 *)
CROSSREFS
Sequence in context: A336578 A285380 A139224 * A006927 A014375 A135748
KEYWORD
nonn,hard,more
AUTHOR
EXTENSIONS
a(16)-a(19) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 18 2018
a(20) from Jeppe Stig Nielsen, Apr 19 2020
STATUS
approved