OFFSET
1,2
LINKS
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[5*10^3], PrimeQ[293*2^# + 1] &] (* G. C. Greubel, May 25 2018 *)
PROG
(PARI) is(n)=ispseudoprime(293*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
(Magma) [n: n in [1..3000] | IsPrime(293*2^n+1)]; // G. C. Greubel, May 25 2018
CROSSREFS
KEYWORD
hard,nonn,more
AUTHOR
N. J. A. Sloane, Dec 29 1999
EXTENSIONS
a(10) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 22 2018
STATUS
approved