login
A332763
Numbers k such that 6*17^k + 1 is prime.
0
0, 1, 5, 7, 19, 23, 67, 107, 400, 429, 617, 743, 1065, 7717, 12329, 14459, 22425, 114543, 221983, 237453
OFFSET
1,3
COMMENTS
a(21) > 3.75*10^5. - Paul S. Vanderveen, Jul 05 2020
MATHEMATICA
Select[Range[0, 1000], PrimeQ[6*17^# + 1] &] (* Amiram Eldar, Feb 24 2020 *)
PROG
(PARI) for(i=1, 10000, if( ispseudoprime(6*17^i+1), print1(i, ", ")));
CROSSREFS
Cf. A141797.
Sequence in context: A268608 A058079 A076787 * A094963 A255490 A045446
KEYWORD
nonn,more
AUTHOR
Paul S. Vanderveen, Feb 22 2020
EXTENSIONS
a(19) from Paul S. Vanderveen, Mar 09 2020
a(20) from Paul S. Vanderveen, Mar 15 2020
STATUS
approved