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 A152539 #10 Jun 04 2016 09:29:56 %S A152539 6,18,36,58,82,112,144,180,222,268,316,368,422,482,544,610,682,756, %T A152539 834,916,1000,1088,1178,1270,1366,1468,1576,1688,1802,1918,2036,2156, %U A152539 2278,2404,2534,2666,2804,2944,3086,3230,3380 %N A152539 Partial sum of A146538. %H A152539 Harvey P. Dale, <a href="/A152539/b152539.txt">Table of n, a(n) for n = 1..1000</a> %t A152539 Accumulate[Select[2*Range[150],!PrimeQ[#+3]&]] (* _Harvey P. Dale_, Jun 04 2016 *) %o A152539 (PARI) lista(nn) = {ps = 0; forstep (n=2, nn, 2, if (! isprime(n+3), ps += n; print1(ps, ", ")););} \\ _Michel Marcus_, Jun 04 2013 %Y A152539 Cf. A146538. %K A152539 easy,nonn %O A152539 1,1 %A A152539 _Giovanni Teofilatto_, Dec 07 2008 %E A152539 More terms from _Michel Marcus_, Jun 04 2013