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.

A051207 Numbers of the form x^2-5^y >= 0.

This page as a plain text file.
%I A051207 #11 May 14 2017 03:00:30
%S A051207 0,3,4,8,11,15,19,20,24,31,35,39,44,48,51,56,59,63,71,75,76,80,95,96,
%T A051207 99,100,104,116,119,120,124,131,139,143,144,159,164,168,171,191,195,
%U A051207 199,200,216,220,224,231,236,239,251,255,264,275,284,288,299,316,319
%N A051207 Numbers of the form x^2-5^y >= 0.
%t A051207 max = 400; Clear[f]; f[m_] := f[m] = Select[Table[x^2 - 5^y, {y, 0, m}, {x, Floor[5^(y/2)], Ceiling[Sqrt[5^y + max]]}] // Flatten // Union, 0 <= # <= max &]; f[1]; f[m = 2]; While[f[m] != f[m - 1], m++]; Print["m = ", m]; A051207 = f[m] (* _Jean-François Alcover_, May 14 2017 *)
%K A051207 nonn
%O A051207 1,2
%A A051207 _David W. Wilson_