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 A051219 #9 May 14 2017 22:48:27
%S A051219 0,1,4,7,8,15,28,39,48,55,60,63,64,71,112,127,151,188,223,252,256,287,
%T A051219 316,343,368,375,391,412,431,448,463,476,487,496,503,508,511,512,615,
%U A051219 727,732,847,960,1023,1071,1084,1180,1287,1392,1439,1495,1596,1695
%N A051219 Numbers of the form 8^x-y^2 >= 0.
%t A051219 max = 2000; Clear[f]; f[m_] := f[m] = Select[Table[8^x - y^2, {x, 0, m}, {y, 0, Ceiling[8^(x/2)]}] // Flatten // Union, 0 <= # <= max &]; f[1]; f[m = 2]; While[f[m] != f[m - 1], m++]; Print["m = ", m]; A051219 = f[m] (* _Jean-François Alcover_, May 14 2017 *)
%K A051219 nonn
%O A051219 1,3
%A A051219 _David W. Wilson_