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 A179654 #8 Jul 19 2015 03:32:25
%S A179654 4,10,33,53,138,201,340,431,624,1024,1116,1557,1989,2202,2702,3357,
%T A179654 4098,4520,5484,6109,6615,7608,8502,9802,11391,12286,13002,14160,
%U A179654 14918,16142,19896,21320,23069,23760,27377,28429,30430,33159,34977,37876,40177
%N A179654 Sum of the numbers already removed (including the target number) in the first jump of a Sieve of Eratosthenes table.
%C A179654 2(4) = 4, 3(6) = 10(4,6), 5(10) = 33(6,8,9,10), 7(14) = 53(8,9,10,12,14), 11(22) = 138(12,14,15,16,18,20,21,22).
%t A179654 fQ[n_, p_] := Block[{q = First /@ FactorInteger@n}, Union[p >= # & /@ q] == {True}]; f[n_] := Block[{p = Prime@n}, Plus @@ Select[ Range[p + 1, 2 p], fQ[ #, p] &]]; Array[f, 41] (* _Robert G. Wilson v_, Aug 23 2010 *)
%Y A179654 Cf. A000040 and A179628.
%K A179654 easy,nonn
%O A179654 0,1
%A A179654 _Odimar Fabeny_, Jul 22 2010
%E A179654 a(6)-a(41) from _Robert G. Wilson v_, Aug 23 2010