|
|
A032473
|
|
Numbers k such that 193*2^k+1 is prime.
|
|
1
|
|
|
2, 4, 8, 12, 24, 28, 30, 70, 82, 100, 124, 134, 434, 478, 540, 708, 952, 1052, 1070, 1528, 1804, 2568, 2914, 3712, 16582, 17342, 23368, 23942, 35998, 72174, 142022, 160658, 177768, 215140, 238092, 313540, 461470, 484500, 868328, 880188, 1679938, 1728894
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
select(k->isprime(193*2^k+1), [$0..1000]); # Muniru A Asiru, Dec 18 2018
|
|
MATHEMATICA
|
Select[Range[1000], PrimeQ[193*2^# + 1] & ] (* Robert Price, Dec 18 2018 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard
|
|
AUTHOR
|
|
|
EXTENSIONS
|
a(31)-a(43) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 18 2018
Term moved from Data section to b-file, and more terms added to b-file, by Jeppe Stig Nielsen, Jan 19 2020
|
|
STATUS
|
approved
|
|
|
|