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 A088764 #16 May 21 2023 19:14:04
%S A088764 3,4,7,13,16,28,31,37,46,52,67,76,88,97,118,133,136,181,196,202,217,
%T A088764 226,241,247,283,286,298,301,328,343,352,361,373,382,412,457,466,493,
%U A088764 508,517,532,556,583,598,613,616,643,646,661,688,721,727,742,763,781,787
%N A088764 a(n) = (A087680(n)-1)/2.
%H A088764 Vincenzo Librandi, <a href="/A088764/b088764.txt">Table of n, a(n) for n = 1..3575</a>
%t A088764 f[n_]:=PrimeQ[n - 4] && PrimeQ[n + 4]; lst={}; Do[If[f[n], AppendTo[lst, (n - 1) / 2]], {n, 3, 7!, 2}]; lst (* _Vincenzo Librandi_, May 19 2017 *)
%t A088764 (#-1)/2&/@(Select[Prime[Range[250]],PrimeQ[#+8]&]+4) (* _Harvey P. Dale_, May 21 2023 *)
%o A088764 (Magma) [(n-1)/2: n in [2..2000] |IsPrime(n+4) and IsPrime(n-4)]; // _Vincenzo Librandi_, May 19 2017
%Y A088764 Cf. A087680, A088762, A088766, A088768, A088770.
%K A088764 nonn
%O A088764 1,1
%A A088764 _Ray Chandler_, Oct 26 2003