[go: up one dir, main page]

login
A322959
Numbers k such that 333*2^k+1 is prime.
0
5, 6, 9, 18, 25, 33, 50, 54, 69, 70, 101, 153, 176, 245, 401, 448, 745, 768, 806, 840, 1338, 1718, 3504, 4164, 5581, 5729, 6010, 6705, 8076, 10233, 12169, 13345, 55285, 58138, 113589, 197820, 203453, 238130, 364946, 817201, 1068320, 1708106, 1837105
OFFSET
1,1
MAPLE
select(n->isprime(333*2^n+1), [$1..1000]); # Muniru A Asiru, Dec 31 2018
MATHEMATICA
Select[Range[1000], PrimeQ[333*2^# + 1] &] (* Robert Price, Dec 31 2018 *)
CROSSREFS
Sequence in context: A327975 A227611 A124519 * A154311 A279702 A375710
KEYWORD
nonn,more,hard
AUTHOR
Robert Price, Dec 31 2018
STATUS
approved