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 A025011 #10 May 09 2018 23:00:27
%S A025011 7,14,24,36,52,74,100,133,174,222,284,356,442,543,665,805,969,1161,
%T A025011 1383,1643,1939,2278,2665,3108,3614,4189,4840,5577,6412,7348,8400,
%U A025011 9584,10912,12392,14049,15903,17963,20253,22801,25624,28757,32214,36044,40273,44943
%N A025011 a(1) = 7; a(n+1) = a(n)-th composite.
%H A025011 Chai Wah Wu, <a href="/A025011/b025011.txt">Table of n, a(n) for n = 1..901</a>
%t A025011 g[ n_Integer ] := (k = n + PrimePi[ n ] + 1; While[ k - PrimePi[ k ] - 1, k++ ]; k); NestList[ g, 7, 45 ]
%t A025011 With[{cmps=Select[Range[100000],CompositeQ]},NestList[cmps[[#]]&,7,50]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jul 08 2017 *)
%Y A025011 Cf. A006508, A025010.
%K A025011 nonn
%O A025011 1,1
%A A025011 _David W. Wilson_