A173059 Nonnegative numbers k such that 2*k + 17 is prime.
0, 1, 3, 6, 7, 10, 12, 13, 15, 18, 21, 22, 25, 27, 28, 31, 33, 36, 40, 42, 43, 45, 46, 48, 55, 57, 60, 61, 66, 67, 70, 73, 75, 78, 81, 82, 87, 88, 90, 91, 97, 103, 105, 106, 108, 111, 112, 117, 120, 123, 126, 127, 130, 132, 133, 138, 145, 147, 148, 150, 157, 160, 165
Offset: 1
Links
- Shawn A. Broyles, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
GAP
Filtered([0..200], k-> IsPrime(2*k+17) ); # G. C. Greubel, May 22 2019
-
Magma
[n: n in [0..200] | IsPrime(2*n+17) ]; // G. C. Greubel, May 22 2019
-
Mathematica
(Prime[Range[7,100]]-17)/2
-
PARI
is(n)=isprime(2*n+17) \\ Charles R Greathouse IV, Feb 17 2017
-
Sage
[n for n in (0..200) if is_prime(2*n+17) ] # G. C. Greubel, May 22 2019
Extensions
Definition clarified by Zak Seidov, Jul 11 2014