[go: up one dir, main page]

login
A032420
Numbers k such that 141*2^k+1 is prime.
3
1, 3, 5, 7, 8, 12, 15, 20, 31, 33, 37, 41, 61, 65, 91, 93, 103, 117, 133, 137, 141, 160, 291, 303, 343, 488, 535, 555, 556, 640, 756, 897, 917, 1745, 1805, 2053, 2372, 3375, 5952, 9612, 15717, 18432, 25593, 29212, 31004, 31135, 32192, 32287, 43477, 44901
OFFSET
1,2
MAPLE
select(k->isprime(141*2^k+1), [$0..400])[]; # Muniru A Asiru, Dec 18 2018
MATHEMATICA
Select[Range[1000], PrimeQ[141*2^# + 1] & ] (* Robert Price, Dec 18 2018 *)
PROG
(PARI) is(n)=ispseudoprime(141*2^n+1) \\ Charles R Greathouse IV, Jun 07 2017
CROSSREFS
Sequence in context: A228075 A309405 A354300 * A127458 A039003 A229860
KEYWORD
nonn
EXTENSIONS
a(51)-a(78) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 18 2018
STATUS
approved