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 A051210 #9 May 14 2017 03:00:36
%S A051210 0,1,3,8,15,17,24,28,35,36,41,48,56,57,63,64,73,80,92,99,105,113,120,
%T A051210 129,132,136,143,161,164,168,188,192,195,217,224,225,248,255,260,272,
%U A051210 281,288,297,316,323,329,336,353,356,360,377,388,392,393,399,420,433
%N A051210 Numbers of the form x^2-8^y >= 0.
%t A051210 max = 500; Clear[f]; f[m_] := f[m] = Select[Table[x^2 - 8^y, {y, 0, m}, {x, Floor[8^(y/2)], Ceiling[Sqrt[8^y + max]]}] // Flatten // Union, 0 <= # <= max &]; f[1]; f[m = 2]; While[f[m] != f[m - 1], m++]; Print["m = ", m]; A051210 = f[m] (* _Jean-François Alcover_, May 14 2017 *)
%K A051210 nonn
%O A051210 1,3
%A A051210 _David W. Wilson_