|
1, 5, 6, 8, 13, 17, 21, 24, 25, 37, 41, 46, 173, 185, 285, 313, 344, 368, 421, 550, 558, 669, 709, 749, 781, 956, 1009, 1141, 1165, 1441, 1461, 1849, 1961, 2070, 2409, 2453, 2658, 2998, 4493, 5737, 6281, 7113, 8488, 8877, 9198, 9777, 10266, 11428, 14200
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MAPLE
|
select(k->isprime(393*2^k+1), [$1..1000]); # Muniru A Asiru, Jan 03 2019
|
|
MATHEMATICA
|
Select[Range[1000], PrimeQ[393*2^# + 1] &]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|