login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A322964
Numbers k such that 343*2^k+1 is prime.
0
2, 20, 22, 46, 58, 226, 3760, 7060, 16192, 22018, 35576, 103952, 113326, 120716, 285122, 543148, 785510, 1033126
OFFSET
1,1
MAPLE
select(n->isprime(343*2^n+1), [$1..1000]); # Muniru A Asiru, Dec 31 2018
MATHEMATICA
Select[Range[1000], PrimeQ[343*2^# + 1] &] (* Robert Price, Dec 31 2018 *)
CROSSREFS
Sequence in context: A136906 A260570 A022372 * A112405 A136885 A359611
KEYWORD
nonn,more,hard
AUTHOR
Robert Price, Dec 31 2018
STATUS
approved