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 A046279 #19 Nov 15 2019 21:34:59 %S A046279 1,4,11,20,33,48,69,94,125,158,195,238,287,338,401,468,537,610,685, %T A046279 764,851,944,1043,1148,1259,1374,1501,1630,1763,1898,2039,2190,2349, %U A046279 2512,2681,2852,3041,3234,3429,3630,3835,4046,4265,4488,4719,4954,5191,5432 %N A046279 Sum of first n lucky numbers. %C A046279 The subsequence of prime partial sums of lucky numbers begins: 11, 401, 1259, 2039. The subsequence of lucky partial sums of lucky numbers begins: 33, 69, 195, 537, 685, 1501, 5191. - _Jonathan Vos Post_, Feb 11 2010 %H A046279 Amiram Eldar, <a href="/A046279/b046279.txt">Table of n, a(n) for n = 1..10000</a> %t A046279 luckyLimit = 300; t = Range[1, luckyLimit, 2]; sieve[n_] := Module[{k = t[[n]]}, t = Delete[t, Table[{i}, {i, k, Length[t], k}]]]; n = 1; While[t[[n]] < Length[t], n++; sieve[n]]; Accumulate[t] (* _Harvey P. Dale_, Apr 05 2011 *) %Y A046279 Cf. A007504, A000959. %K A046279 nonn %O A046279 1,2 %A A046279 _Patrick De Geest_, Jun 15 1998 %E A046279 Offset 1 from _Michel Marcus_, Oct 10 2019