login
A322963
Numbers k such that 341*2^k+1 is prime.
0
1, 3, 7, 19, 21, 33, 43, 99, 183, 235, 499, 579, 1137, 1225, 1941, 1987, 2409, 3285, 9093, 9121, 11043, 14997, 17919, 31543, 57163, 83595, 127915, 129199, 220651, 384961, 1255881, 1325277, 1728697
OFFSET
1,2
MAPLE
select(n->isprime(341*2^n+1), [$1..1000]); # Muniru A Asiru, Dec 31 2018
MATHEMATICA
Select[Range[1000], PrimeQ[341*2^# + 1] &] (* Robert Price, Dec 31 2018 *)
CROSSREFS
Sequence in context: A032667 A109991 A248219 * A018432 A205302 A127925
KEYWORD
nonn,more,hard
AUTHOR
Robert Price, Dec 31 2018
STATUS
approved