[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A032468
Numbers k such that 183*2^k+1 is prime.
1
1, 2, 5, 10, 21, 34, 61, 72, 157, 169, 193, 216, 389, 464, 596, 657, 794, 1289, 1616, 1736, 1994, 2344, 3024, 4084, 4420, 5840, 6481, 12010, 12521, 12920, 13762, 15652, 17480, 17800, 22514, 25193, 40989, 55565, 57440, 88409, 92146, 123964, 150485, 163953
OFFSET
1,2
LINKS
MAPLE
select(k->isprime(183*2^k+1), [$0..1000]); # Muniru A Asiru, Dec 18 2018
MATHEMATICA
Select[Range[1000], PrimeQ[183*2^# + 1] & ] (* Robert Price, Dec 18 2018 *)
PROG
(PARI) is(n)=ispseudoprime(183*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Sequence in context: A124146 A262408 A344378 * A327286 A215925 A359209
KEYWORD
nonn,hard
AUTHOR
EXTENSIONS
a(41)-a(60) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 18 2018
STATUS
approved