login
A053363
Numbers k such that 293*2^k + 1 is prime.
0
1, 5, 181, 257, 469, 1541, 2857, 3521, 14245, 1049569
OFFSET
1,2
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
Sequence in context: A250327 A366342 A162136 * A027572 A050239 A218690
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