
1, 3, 6, 8, 10, 13, 14, 16, 17, 21, 22, 26, 30, 32, 33, 39, 49, 53, 152, 162, 181, 233, 328, 576, 629, 666, 824, 850, 919, 1131, 1738, 1782, 1957, 1983, 2601, 2643, 2729, 2784, 2817, 2973, 3226, 3478, 3759, 5479, 6642, 10889, 12869, 15926, 16718, 18022
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


LINKS



MAPLE

select(k>isprime(375*2^k+1), [$1..1000]); # Muniru A Asiru, Jan 02 2019


MATHEMATICA

Select[Range[1000], PrimeQ[375*2^# + 1] &] (* Robert Price, Jan 02 2019 *)


CROSSREFS



KEYWORD

nonn,hard


AUTHOR



STATUS

approved

