A088769 a(n) = A087678(n)/2.

7, 10, 11, 14, 16, 19, 25, 26, 31, 35, 40, 44, 46, 49, 59, 61, 70, 74, 79, 86, 91, 94, 95, 101, 110, 116, 121, 124, 130, 136, 151, 161, 170, 179, 194, 196, 205, 215, 220, 224, 226, 229, 235, 250, 256, 266, 289, 304, 305, 311, 325, 326, 334, 341, 346, 350, 355

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..4350

Mathematica

Select[Range[5, 2000], PrimeQ[# + 9] && PrimeQ[# - 9] &] / 2 (* Vincenzo Librandi, May 21 2017 *)

Prog

(Magma) [n/2: n in [5..1500] |IsPrime(n+9) and IsPrime(n-9)]; // Vincenzo Librandi, May 22 2017

Crossrefs

Cf. A087678, A040040, A088763, A088765, A088767.

Sequence in context: A094764 A066468 A347393 * A057986 A274204 A306929

Adjacent sequences: A088766 A088767 A088768 * A088770 A088771 A088772

Keyword

nonn

Author

Ray Chandler, Oct 26 2003

Status

approved