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 A199004 #14 Apr 11 2022 22:04:42 %S A199004 1,2,7,8,9,35,49,55,75,76,82,84,115,124,133,140,144,153,167,172,177, %T A199004 200,201,202,203,211,213,232,235,237,240,243,245,252,256,262,276,281, %U A199004 285,297,305,319,322,325,331,349,352,353,374,377,379,380,399,407,415 %N A199004 Position of n-th prime sextuplet A022008(n) among prime 5-tuples A022007. %H A199004 Zak Seidov, <a href="/A199004/b199004.txt">Table of n, a(n) for n = 1..1000</a> %F A199004 A022007(a(n))=A022008(n). %e A199004 a(3)=7 because A022008(3)=16057=A022007(7), %e A199004 a(1000)=12091 because A022008(1000)=5054057077=A022007(12091). %t A199004 lst = {}; cnt = 0; Do[p = Prime[n]; If[PrimeQ[p+4] && PrimeQ[p+6] && PrimeQ[p+10] && PrimeQ[p+12], cnt++; If[PrimeQ[p+16], AppendTo[lst, cnt]]], {n, 10000000}]; lst (* _T. D. Noe_, Nov 01 2011 *) %Y A199004 Cf. A022007, A022008. %K A199004 nonn %O A199004 1,2 %A A199004 _Zak Seidov_, Nov 01 2011