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 A072475 #11 Dec 05 2013 19:55:20 %S A072475 4,14,31,63,112,176,264,385,529,712,932,1184,1503,1833,2234,2689,3207, %T A072475 3779,4408,5117,5913,6747,7657,8667,9766,10938,12240,13612,15071, %U A072475 16578,18266,20081,22007,23989,26100,28334,30695,33221,35811,38569,41474 %N A072475 Sum of next n composite numbers. %H A072475 Harvey P. Dale, <a href="/A072475/b072475.txt">Table of n, a(n) for n = 1..1000</a> %t A072475 Composite[n_Integer] := FixedPoint[n + PrimePi[ # ] + 1 &, n + PrimePi[n] + 1]; Table[ Sum[ Composite[i], {i, n(n - 1)/2 + 1, n(n + 1)/2}], {n, 1, 42}] %t A072475 With[{terms=50},cnos=With[{c=(terms(terms+1)(terms+2))/6}, Complement[ Range[5,c], Prime[Range[PrimePi[c]]]]];Join[{4}, Total/@Table[Take[ cnos,{n (n+1)/2,(n+1) (n+2)/2-1}],{n,terms-1}]]] (* _Harvey P. Dale_, Oct 10 2011 *) %Y A072475 Cf. A072474, A007468, A006003. %K A072475 nonn %O A072475 1,1 %A A072475 _Amarnath Murthy_, Jun 20 2002 %E A072475 More terms from _Jim Nastos_ and _Robert G. Wilson v_, Jun 21 2002