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 A099655 #6 Mar 07 2017 13:27:15
%S A099655 4,4,2,2,6,2,6,2,6,2,4,6,6,8,4,4,14,4,2,10,6,6,6,10,2,12,12,12,12,2,6,
%T A099655 6,6,10,14,4,14,14,10,4,8,6,6,8,8,10,6,8,8,2,12,8,8,6,12,18,18,10,6,6,
%U A099655 6,2,2,12,12,6,12,8,10,8,10,8,4,6,8,4,14,12,2,2,14,14,14,14,2,20,20,8,10,8
%N A099655 a[n]=A098085[n]-A096215[n], difference between next and previous primes to A011974[n], the sum of two consecutive primes.
%F A099655 a(n)=NextPrime[p(n)+p(n+1)]-PreviousPrime[p(n)+p(n+1)]
%e A099655 n=8, p(8)+p(9)=19+23=42,a[8]=43-41=2=a(8).
%t A099655 <<NumberTheory`NumberTheoryFunctions` t1=Table[PreviousPrime[Prime[n]+Prime[n+1]], {n, 1, 128}]; t2=Table[NextPrime[Prime[n]+Prime[n+1]], {n, 1, 128}];t2-t1
%t A099655 NextPrime[#]-NextPrime[#,-1]&/@(Total/@Partition[Prime[Range[100]],2,1]) (* _Harvey P. Dale_, Mar 07 2017 *)
%Y A099655 Cf. A098085, A096215, A011974.
%K A099655 nonn
%O A099655 1,1
%A A099655 _Labos Elemer_, Nov 17 2004