cp's OEIS Frontend

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.

A051208 Numbers of the form x^2-6^y >= 0.

This page as a plain text file.
%I A051208 #10 May 13 2017 23:29:59
%S A051208 0,3,8,9,10,13,15,19,24,28,30,35,40,43,45,48,58,63,64,73,75,80,85,94,
%T A051208 99,108,115,120,133,138,143,145,148,160,163,168,184,189,190,195,219,
%U A051208 220,224,225,250,253,255,268,283,288,304,313,318,323,324,325,355,360,364,385,394,399
%N A051208 Numbers of the form x^2-6^y >= 0.
%t A051208 max = 400; Clear[f]; f[m_] := f[m] = Select[Table[x^2 - 6^y, {y, 0, m}, {x, Floor[6^(y/2)], Ceiling[Sqrt[6^y + max]]}] // Flatten // Union, 0 <= # <= max &]; f[1]; f[m = 2]; While[f[m] != f[m - 1], m++]; Print["m = ", m]; A051208 = f[m] (* _Jean-François Alcover_, May 13 2017 *)
%K A051208 nonn
%O A051208 1,2
%A A051208 _David W. Wilson_