login
A053352
Numbers k such that 271*2^k + 1 is prime.
0
4, 84, 2164, 7780, 48100, 1165420
OFFSET
1,1
MATHEMATICA
Select[Range[5*10^3], PrimeQ[271*2^# + 1] &] (* G. C. Greubel, May 24 2018 *)
PROG
(PARI) is(n)=ispseudoprime(271*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
(Magma) [n: n in [1..300] | IsPrime(271*2^n+1)]; // G. C. Greubel, May 24 2018
CROSSREFS
Sequence in context: A203244 A245544 A361052 * A322330 A356504 A270577
KEYWORD
hard,nonn,more
AUTHOR
N. J. A. Sloane, Dec 29 1999
EXTENSIONS
a(6) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 20 2018
STATUS
approved