login
A032466
Numbers k such that 179*2^k+1 is prime.
1
1, 3, 11, 15, 19, 35, 39, 51, 63, 111, 113, 163, 419, 633, 665, 1511, 1903, 2335, 3063, 3459, 3623, 3655, 4519, 7855, 10219, 13881, 17063, 20783, 20833, 39665, 55711, 91471, 150905, 165193, 168715, 172575, 179171, 429871, 548291, 623635, 1082249, 1224019
OFFSET
1,2
COMMENTS
The subsequence of prime values starts 3, 11, 19, 113, 163, 419, 1511, 3623, 4519, 55711, 548291, ... - Muniru A Asiru, Apr 28 2019
MAPLE
select(k->isprime(179*2^k+1), [$0..1000]); # Muniru A Asiru, Dec 18 2018
MATHEMATICA
Select[Range[1000], PrimeQ[179*2^# + 1] & ] (* Robert Price, Dec 18 2018 *)
PROG
(PARI) is(n)=ispseudoprime(179*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
(Magma) [n: n in [1..5000] |IsPrime(179*2^n+1)]; // Vincenzo Librandi, Dec 19 2018
CROSSREFS
Sequence in context: A075330 A131323 A050592 * A060698 A294690 A331831
KEYWORD
nonn,hard
AUTHOR
EXTENSIONS
a(33)-a(43) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 18 2018
Term moved from Data section to b-file, and new term added to b-file, by Jeppe Stig Nielsen, Apr 04 2020
STATUS
approved