A102278 Numbers k such that 78*10^k + 217 is prime.
1, 2, 8, 10, 13, 21, 22, 36, 57, 80, 149, 484, 505, 642, 806, 974, 1674, 34177
Offset: 1
Examples
8 is in the sequence because 78.(8-3)(0).217 = 7800000217 is prime.
Programs
-
Mathematica
Do[If[PrimeQ[78*10^n + 217], Print[n]], {n, 8280}]
-
PARI
is(n)=ispseudoprime(78*10^n+217) \\ Charles R Greathouse IV, May 22 2017
Extensions
a(18) from Michael S. Branicky, Oct 15 2024
Comments