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 A046285 #15 Nov 16 2019 10:29:31
%S A046285 10,20,34,36,46,52,56,68,72,86,88,90,96,100,102,118,130,140,144,154,
%T A046285 166,198,228,240,242,282,318,328,348,356,360,366,392,402,418,440,452,
%U A046285 464,472,476,510,540,556,570,572,586,592,600,604,614,638,650,654,670,684
%N A046285 Numbers k such that the sum of the first k primes is a lucky number.
%H A046285 Amiram Eldar, <a href="/A046285/b046285.txt">Table of n, a(n) for n = 1..730</a>
%t A046285 lst = Range[1, 1700000, 2]; i = 2; While[ i <= (len = Length@lst) && (k = lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++ ]; lst2 = {}; s = 0; Do[s = s + Prime@n; If[MemberQ[lst, s], Print[n]; AppendTo[lst2, n]], {n, 687}]; lst2 (* _Robert G. Wilson v_ *)
%Y A046285 Cf. A000959, A007504, A046280.
%K A046285 nonn
%O A046285 1,1
%A A046285 _Patrick De Geest_, Jun 15 1998
%E A046285 More terms from _Robert G. Wilson v_, May 12 2006