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 A072572 #11 Oct 29 2013 16:33:15 %S A072572 9,15,21,39,45,69,81,93,99,105,111,129,165,195,225,231,279,309,315, %T A072572 351,363,381,393,399,405,441,453,459,465,483,489,495,501,615,645,675, %U A072572 687,705,723,741,747,759,765,771,825,855,861,879,885,897,909,915,933 %N A072572 Odd interprimes divisible by 3. %H A072572 Harvey P. Dale, <a href="/A072572/b072572.txt">Table of n, a(n) for n = 1..1000</a> %t A072572 a = Table[ Prime[n], {n, 2, 200}]; b = {}; Do[d = (a[[n + 1]] - a[[n]])/2; If[ OddQ[a[[n]] + d] && Mod[d, 3] != 0, b = Append[b, a[[n]] + d]], {n, 1, 198}]; b %t A072572 Select[Mean/@Partition[Prime[Range[4,200]],2,1],OddQ[#]&&Divisible[ #,3]&] (* _Harvey P. Dale_, Oct 29 2013 *) %Y A072572 Cf. A072569, A072573, A024675. %K A072572 nonn %O A072572 1,1 %A A072572 _Marco Matosic_, Jun 25 2002 %E A072572 Edited by _N. J. A. Sloane_ and _Robert G. Wilson v_, Jun 27 2002 %E A072572 Corrected by _T. D. Noe_, Nov 01 2006