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 A054828 #8 Dec 12 2014 10:33:08 %S A054828 2903,13463,13901,14947,15373,15377,21397,21557,21859,28277,30869, %T A054828 33199,35591,37691,42221,42569,45821,55661,64661,64919,64921,68207, %U A054828 68209,68897,68899,73939,74201,78577,83089,85513,87313,88001,90907 %N A054828 First term of weak prime sextet: p(m+1)-p(m) < p(m+2)-p(m+1) < p(m+3)-p(m+2) < p(m+4)-p(m+3) < p(m+5)-p(m+4). %H A054828 Harvey P. Dale, <a href="/A054828/b054828.txt">Table of n, a(n) for n = 1..1000</a> %t A054828 Transpose[Select[Partition[Prime[Range[9000]],6,1],AllTrue[ Differences[ #,2], Positive]&]] [[1]] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Dec 12 2014 *) %Y A054828 Cf. A051635, A054800-A054840. %K A054828 nonn %O A054828 1,1 %A A054828 _Henry Bottomley_, Apr 10 2000