OFFSET
1,1
LINKS
Ray Ballinger, Proth Search Page
Ray Ballinger and Wilfrid Keller, List of primes k.2^n + 1 for k < 300
Wilfrid Keller, List of primes k.2^n - 1 for k < 300
MATHEMATICA
Select[Range[1000], PrimeQ[117*2^# + 1] & ] (* Robert Price, Dec 17 2018 *)
PROG
(PARI) is(n)=ispseudoprime(117*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
EXTENSIONS
Extended by Hugo Pfoertner, Jul 02 2003
a(28)-a(37) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 17 2018
a(38) from Jeppe Stig Nielsen, Feb 25 2020
a(39) from Jeppe Stig Nielsen, Dec 23 2024
STATUS
approved
