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 A059408 #7 May 14 2018 18:28:35
%S A059408 13,22,34,50,70,95,126,165,213,272,341,424,524,640,778,938,1127,1345,
%T A059408 1596,1886,2217,2596,3031,3523,4086,4724,5445,6259,7176,8205,9364,
%U A059408 10666,12118,13744,15560,17583,19827,22328,25099,28171,31569,35334
%N A059408 a(n+1) = a(n)-th composite and a(1) = 13.
%H A059408 Chai Wah Wu, <a href="/A059408/b059408.txt">Table of n, a(n) for n = 1..900</a>
%t A059408 g[ n_Integer ] := (k = n + PrimePi[ n ] + 1; While[ k - PrimePi[ k ] - 1, k++ ]; k); NestList[ g, 13, 45 ]
%o A059408 (PARI) lista(nn) = {print1(a = 13, ", "); nb = 0; forcomposite(c=1, nn, nb++; if (nb==a, print1(c, ", "); a = c););} \\ _Michel Marcus_, May 14 2018
%Y A059408 Cf. A006508, A059407.
%K A059408 nonn
%O A059408 1,1
%A A059408 _Robert G. Wilson v_, Jan 29 2001