This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A087678 #21 Nov 23 2019 20:51:35
%S A087678 14,20,22,28,32,38,50,52,62,70,80,88,92,98,118,122,140,148,158,172,
%T A087678 182,188,190,202,220,232,242,248,260,272,302,322,340,358,388,392,410,
%U A087678 430,440,448,452,458,470,500,512,532,578,608,610,622,650,652,668,682,692
%N A087678 Numbers n such that n + 9 and n - 9 are both prime.
%H A087678 Daniel Starodubtsev, <a href="/A087678/b087678.txt">Table of n, a(n) for n = 1..10000</a>
%t A087678 f[n_]:=PrimeQ[n-9]&&PrimeQ[n+9]; lst={};Do[If[f[n],AppendTo[lst,n]],{n,6,8!,2}];lst (* _Vladimir Joseph Stephan Orlovsky_, Oct 09 2009 *)
%t A087678 Select[Range[10,700],AllTrue[#+{9,-9},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Nov 23 2019 *)
%Y A087678 Cf. A014574, A087679-A087683, A087695-A087697, A088769.
%K A087678 easy,nonn
%O A087678 1,1
%A A087678 _Zak Seidov_, Sep 27 2003