login
A322971
Numbers k such that 347*2^k+1 is prime.
1
3, 7, 15, 23, 27, 175, 259, 391, 607, 679, 863, 927, 999, 1339, 1371, 1555, 2103, 2151, 2715, 5619, 6411, 7055, 12927, 19015, 26095, 42523, 45719, 55519, 70971, 87663, 176007, 243391, 287083, 544887, 696327, 902995, 1041223, 1061675, 1218211, 1355595
OFFSET
1,1
MAPLE
select(k->isprime(347*2^k+1), [$1..1000]); # Muniru A Asiru, Jan 02 2019
MATHEMATICA
Select[Range[1000], PrimeQ[347*2^# + 1] &] (* Robert Price, Jan 01 2019 *)
CROSSREFS
Sequence in context: A091711 A103007 A077790 * A165469 A160160 A192122
KEYWORD
nonn,hard
AUTHOR
Robert Price, Jan 01 2019
STATUS
approved