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 A071702 #10 Nov 12 2021 19:36:38 %S A071702 0,0,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2, %T A071702 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3, %U A071702 3,3,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4 %N A071702 Number of twin prime pairs <= n of form (4*k+3,4*(k+1)+1), k>=0. %C A071702 As for A071538 the convention is followed that a twin prime pair is <= n if its smaller member is <= n. %C A071702 If {a,b} is a twin prime pair (a<b), and Mod[a,4]==3, there is no need to test b because it must be 1 Mod 4. - _Harvey P. Dale_, Nov 12 2021 %H A071702 Harvey P. Dale, <a href="/A071702/b071702.txt">Table of n, a(n) for n = 1..1000</a> %e A071702 a(60)=3, since (59,61) is included along with (3,5) and (11,13). %t A071702 Accumulate[Table[If[AllTrue[{n,n+2},PrimeQ]&&Mod[n,4]==3,1,0],{n,100}]] (* _Harvey P. Dale_, Nov 12 2021 *) %Y A071702 a(n) = A071538(n) - A071701(n), cf. A071698, A071699. %K A071702 nonn %O A071702 1,11 %A A071702 _Reinhard Zumkeller_, Jun 04 2002