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 A003310 M2305 #25 Oct 21 2023 17:56:49 %S A003310 3,4,5,7,8,11,13,17,19,20,26,29,32,37,38,43,49,50,56,62,67,68,71,73, %T A003310 86,89,91,98,103,113,116,121,127,131,133,137,140,151,158,161,169,173, %U A003310 179,182,188,200,206,209,211,221,227,230,239,242,247,253,259,271,277,278 %N A003310 Generated by a sieve. %C A003310 Apply the sieve of A003309, but begin with 3 rather than 2. %D A003310 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). %H A003310 Reinhard Zumkeller, <a href="/A003310/b003310.txt">Table of n, a(n) for n = 1..1000</a> %H A003310 Popular Computing (Calabasas, CA), <a href="/A003309/a003309.pdf">Sieves: Problem 43</a>, Vol. 2 (No. 13, Apr 1974), pp. 6-7. This is Sieve #2. [Annotated and scanned copy] %H A003310 <a href="/index/Si#sieve">Index entries for sequences generated by sieves</a> %t A003310 t = Range[3, 330]; r = {}; While[Length[t] >0, k = First[t]; AppendTo[r, k]; t = Drop[t, {1, -1, k}];]r (* _Ray Chandler_, Dec 02 2004 *) %o A003310 (Haskell) %o A003310 a003310 n = a003310_list !! (n-1) %o A003310 a003310_list = f [3..] where %o A003310 f (x:xs) = x : f (g xs) where %o A003310 g zs = us ++ g vs where (us, _:vs) = splitAt (x - 1) zs %o A003310 -- _Reinhard Zumkeller_, Nov 12 2014 %Y A003310 Cf. A003309, A100464. %K A003310 nonn,easy %O A003310 1,1 %A A003310 _N. J. A. Sloane_ %E A003310 More terms from _Ray Chandler_, Dec 02 2004