A032416 Numbers k such that 133*2^k+1 is prime.

4, 6, 10, 16, 30, 124, 174, 192, 336, 600, 720, 1092, 1138, 1588, 1652, 1812, 3012, 3308, 7266, 7446, 10136, 10656, 12140, 21756, 63870, 66020, 81156, 90346, 109600, 127600, 193148, 193674, 200878, 278806, 894310, 1027150, 1471408, 1684616, 2455666, 2701452

Offset

1,1

Links

Jeppe Stig Nielsen, Table of n, a(n) for n = 1..41

Ray Ballinger, Proth Search Page

Ray Ballinger and Wilfrid Keller, List of primes k.2^n + 1 for k < 300

Y. Gallot, Proth.exe: Windows Program for Finding Large Primes

Wilfrid Keller, List of primes k.2^n - 1 for k < 300

Index entries for sequences of n such that k*2^n-1 (or k*2^n+1) is prime

Mathematica

Select[Range[1000], PrimeQ[133*2^# + 1] & ] (* Robert Price, Dec 17 2018 *)

Prog

(PARI) is(n)=ispseudoprime(133*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
(Magma) [n: n in [1..6000] |IsPrime(133*2^n+1)]; // Vincenzo Librandi, Dec 18 2018

Crossrefs

Sequence in context: A023501 A050887 A078642 * A283496 A117149 A344146

Adjacent sequences: A032413 A032414 A032415 * A032417 A032418 A032419

Keyword

nonn,more

Author

James R. Buddenhagen

Extensions

Extended by Hugo Pfoertner, Jul 02 2003

a(31)-a(38) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 17 2018

a(39)-a(40) from Jeppe Stig Nielsen, Mar 12 2020

Status

approved