login
A032408
Numbers k such that 117*2^k+1 is prime.
0
3, 4, 6, 10, 16, 30, 36, 91, 94, 156, 382, 454, 643, 867, 1416, 2656, 2851, 5971, 6016, 7260, 9876, 15019, 43504, 53827, 88132, 149032, 153372, 207571, 223656, 258442, 344850, 403164, 946852, 1024380, 1035072, 1057032, 1157460, 2794014
OFFSET
1,1
MATHEMATICA
Select[Range[1000], PrimeQ[117*2^# + 1] & ] (* Robert Price, Dec 17 2018 *)
PROG
(PARI) is(n)=ispseudoprime(117*2^n+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Sequence in context: A355325 A068922 A375382 * A347567 A018908 A353138
KEYWORD
nonn,more
EXTENSIONS
Extended by Hugo Pfoertner, Jul 02 2003
a(28)-a(37) from the Ray Ballinger and Wilfrid Keller link by Robert Price, Dec 17 2018
a(38) from Jeppe Stig Nielsen, Feb 25 2020
STATUS
approved