|
|
A032470
|
|
Numbers k such that 187*2^k+1 is prime.
|
|
0
|
|
|
6, 12, 48, 82, 126, 186, 732, 1926, 2802, 6712, 10026, 16062, 17790, 18156, 67878, 176316, 194950, 231112, 239832, 494602, 497926, 693012, 788640, 2249974
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
select(k->isprime(187*2^k+1), [$0..1000]); # Muniru A Asiru, Dec 18 2018
|
|
MATHEMATICA
|
Select[Range[1000], PrimeQ[187*2^# + 1] & ] (* Robert Price, Dec 18 2018 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
a(16)-a(23) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 18 2018
|
|
STATUS
|
approved
|
|
|
|