login
A032475
Numbers k such that 197*2^k+1 is prime.
0
15, 19, 35, 55, 59, 115, 163, 371, 1175, 3047, 5615, 7855, 9155, 16467, 22303, 32879, 66123, 70619, 85607, 117047, 238083, 354335, 1502095, 1568755, 1830255, 2244347
OFFSET
1,1
MATHEMATICA
Select[Range[1000], PrimeQ[197*2^# + 1] & ] (* Robert Price, Dec 19 2018 *)
PROG
(PARI) is(n)=ispseudoprime(197*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Sequence in context: A164564 A211329 A104298 * A169728 A167054 A241680
KEYWORD
nonn,hard,more
AUTHOR
EXTENSIONS
a(20)-a(25) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 19 2018
a(26) from Jeppe Stig Nielsen, Apr 19 2020
STATUS
approved