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 A052242 #17 Jun 17 2014 15:48:00 %S A052242 1397609,1436339,2270459,4181669,4231919,4425599,4650029,4967329, %T A052242 7124099,8254049,8431369,9000379,9149639,11343509,11584009,11734249, %U A052242 12867319,13723009,14461229,14590159,15587659,15776239,15932899 %N A052242 Initial prime in set of 4 consecutive primes in arithmetic progression with common difference 24. %H A052242 Zak Seidov, <a href="/A052242/b052242.txt">Table of n, a(n) for n = 1..1000</a> %H A052242 <a href="/index/Pri#primes_AP">Index entries for sequences related to primes in arithmetic progressions</a> %t A052242 A052242 = Reap[For[p = 2, p < 16000000, p = NextPrime[p], p2 = NextPrime[p]; If[p2 - p == 24, p3 = NextPrime[p2]; If[p3 - p2 == 24, p4 = NextPrime[p3]; If[p4 - p3 == 24, Print[p]; Sow[p]]]]]][[2, 1]] (* _Jean-François Alcover_, Jun 28 2012 *) %t A052242 Transpose[Select[Partition[Prime[Range[1100000]],4,1],Union[ Differences[#]] == {24}&]][[1]] (* _Harvey P. Dale_, Jun 17 2014 *) %Y A052242 Analogous sequences [with common difference in square brackets]: A033451 [6], A033447 [12], A033448 [18], A052242 [24], A052243 [30]. %K A052242 nonn %O A052242 1,1 %A A052242 _Labos Elemer_, Jan 31 2000 %E A052242 More terms from _Harvey P. Dale_, Nov 25 2000 %E A052242 Definition clarified by _Harvey P. Dale_, Jun 17 2014