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 A051212 #9 May 14 2017 22:48:14
%S A051212 0,3,6,8,15,21,24,26,35,39,44,48,54,63,69,71,80,89,90,96,99,111,120,
%T A051212 125,134,143,156,159,168,186,189,195,201,215,224,225,246,255,261,279,
%U A051212 288,296,300,314,323,341,351,360,369,384,390,399,404,429,431,440,444
%N A051212 Numbers of the form x^2-10^y >= 0.
%t A051212 max = 500; Clear[f]; f[m_] := f[m] = Select[Table[x^2 - 10^y, {y, 0, m}, {x, Floor[10^(y/2)], Ceiling[Sqrt[10^y + max]]}] // Flatten // Union, 0 <= # <= max &]; f[1]; f[m = 2]; While[f[m] != f[m - 1], m++]; Print["m = ", m]; A051212 = f[m] (* _Jean-François Alcover_, May 14 2017 *)
%K A051212 nonn
%O A051212 1,2
%A A051212 _David W. Wilson_