OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = A086303(n)/2.
MATHEMATICA
(Prime[Range[7, 100]]-15)/2 (* Vladimir Joseph Stephan Orlovsky, Feb 08 2010 *)
Select[Range[0, 200], PrimeQ[2 # + 15] &] (* Vincenzo Librandi, Apr 28 2014 *)
PROG
(Magma) [n: n in [0..200] | IsPrime(2*n+15)]; // Vincenzo Librandi, Apr 28 2014
(PARI) is(n)=isprime(2*n+15) \\ Charles R Greathouse IV, Apr 28 2015
(Sage) [n for n in (0..200) if is_prime(2*n+15) ] # G. C. Greubel, May 22 2019
(GAP) Filtered([0..200], k-> IsPrime(2*k+15) ) # G. C. Greubel, May 22 2019
CROSSREFS
Cf. A086303.
Numbers n such that 2n+k is prime: A005097 (k=1), A067076 (k=3), A089038 (k=5), A105760 (k=7), A155722 (k=9), A101448 (k=11), A153081 (k=13), this seq (k=15), A173059 (k=17), A153143 (k=19).
KEYWORD
easy,nonn
AUTHOR
Ray Chandler, Nov 29 2003
EXTENSIONS
Definition clarified by Zak Seidov, Jul 11 2014
STATUS
approved