A108595 Numbers k such that 10*k + 103 is prime.
0, 1, 6, 7, 9, 12, 13, 16, 18, 19, 21, 25, 27, 28, 33, 34, 36, 40, 42, 46, 49, 51, 54, 55, 57, 58, 63, 64, 67, 72, 75, 76, 78, 85, 88, 91, 93, 96, 99, 100, 102, 105, 106, 109, 111, 112, 118, 120, 127, 132, 133, 135, 138, 139, 142, 144, 145, 148, 151, 156, 159, 162, 163
Offset: 1
Examples
If n=33 then 10*n + 103 = 433 (prime).
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[n: n in [0..300] |IsPrime(10*n + 103)]; // Vincenzo Librandi, Nov 13 2010
-
Mathematica
Select[Range[0,300], PrimeQ[10*# +103] &] (* G. C. Greubel, Oct 21 2023 *)
-
PARI
is(n)=isprime(10*n+103) \\ Charles R Greathouse IV, Jun 13 2017
-
SageMath
[n for n in (0..300) if is_prime(10*n+103)] # G. C. Greubel, Oct 21 2023