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 A226692 #10 Jun 17 2013 13:57:53 %S A226692 59,281,347,521,569,617,1787,2111,4049,4421,5879,6197,8231,9677,10457, %T A226692 11699,12071,12161,12377,14009,16139,17597,17837,21647,22697,33347, %U A226692 36341,39227,41609,43781,44087,46271,48779,51197,53087,56909,58229,58439,64187 %N A226692 The first member of a twin prime pair whose sum equals the sums of k consecutive smaller pairs of twin primes, k=3. %H A226692 Zak Seidov, <a href="/A226692/b226692.txt">Table of n, a(n) for n = 1..1000</a> %e A226692 59 + 61 = (11 + 13) + (17 + 19) + (29 + 31) = 120, %e A226692 281 + 283 = (71 + 73) + (101 + 103) + (107 + 109) = 564. %t A226692 s = Select[2*Range[40000], PrimeQ[# - 1] && PrimeQ[# + 1] &]; Intersection[s, Total /@ Partition[s, 3, 1]] - 1 (* _T. D. Noe_, Jun 17 2013 *) %Y A226692 Cf. A225943 (k=2). %K A226692 nonn %O A226692 1,1 %A A226692 _Zak Seidov_, Jun 15 2013