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[161*2^# + 1] & ] (* Robert Price, Dec 18 2018 *)
PROG
(PARI) is(n)=ispseudoprime(161*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
EXTENSIONS
a(25)-a(31) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 18 2018
a(32) from Jeppe Stig Nielsen, May 30 2020
a(33)-a(34) from Jeppe Stig Nielsen, Dec 23 2024
STATUS
approved