A102342 Numbers k such that 10k + 7 is prime.
0, 1, 3, 4, 6, 9, 10, 12, 13, 15, 16, 19, 22, 25, 27, 30, 31, 33, 34, 36, 39, 45, 46, 48, 54, 55, 57, 58, 60, 61, 64, 67, 72, 75, 78, 79, 82, 85, 87, 88, 90, 93, 94, 96, 97, 99, 108, 109, 111, 118, 121, 123, 127, 129, 130, 132, 136, 142, 144, 148, 156, 159, 160, 162, 163
Offset: 1
Keywords
Examples
10*1 + 7 = 17 (prime); 10*48 + 7 = 487 (prime); 10*99 + 7 = 997 (prime).
Programs
-
Magma
[n: n in [0..3000]| IsPrime(10*n+7)]; // Vincenzo Librandi, Apr 06 2011
-
Mathematica
Select[Range[0, 170], PrimeQ[10# + 7] &] (* Ray Chandler, Nov 07 2006 *)
-
PARI
is(n)=isprime(10*n+7) \\ Charles R Greathouse IV, Feb 17 2017
Extensions
Edited and extended by Ray Chandler, Nov 07 2006