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 A051205 #10 May 13 2017 23:29:51
%S A051205 0,1,3,6,7,8,9,13,15,16,19,22,24,27,33,35,37,40,46,48,54,55,61,63,72,
%T A051205 73,78,80,81,88,91,94,97,99,112,115,117,118,120,135,141,142,143,144,
%U A051205 157,160,163,166,168,169,171,175,187,193,195,198,208,214,216,222,224
%N A051205 Numbers of the form x^2-3^y >= 0.
%t A051205 max = 300; Clear[f]; f[m_] := f[m] = Select[Table[x^2 - 3^y, {y, 0, m}, {x, Floor[3^(y/2)], Ceiling[Sqrt[3^y + max]]}] // Flatten // Union, 0 <= # <= max &]; f[1]; f[m = 2]; While[f[m] != f[m - 1], m++]; Print["m = ", m]; A051205 = f[m] (* _Jean-François Alcover_, May 13 2017 *)
%K A051205 nonn
%O A051205 1,3
%A A051205 _David W. Wilson_