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.

A127024 Let f(n) = exp(Pi*sqrt(n)); sequence gives numbers n such that ceiling(f(n)) - f(n) < 1/10^5.

This page as a plain text file.
%I A127024 #20 Oct 14 2017 05:12:26
%S A127024 58,67,163,232,1467,4075,343732,357711,478233,486396,881967,1003957,
%T A127024 1033466,1045512,1053883,1091706,1208198,1240173,1341615,1844122,
%U A127024 1878006,1964724,2177184,2259143,2276046,2279335,2488542,2691364,2850458,3157407,3262163,3310971
%N A127024 Let f(n) = exp(Pi*sqrt(n)); sequence gives numbers n such that ceiling(f(n)) - f(n) < 1/10^5.
%D A127024 J.-P. Serre, "Lectures on the Mordell-Weil theorem".
%H A127024 Anthony Canu, <a href="/A127024/b127024.txt">Table of n, a(n) for n = 1..50</a>
%t A127024 a = {}; Do[If[(1 - (Exp[Pi Sqrt[x]] - Floor[Exp[Pi Sqrt[x]]]) > 0) && (1 - ( Exp[Pi Sqrt[x]] - Floor[Exp[Pi Sqrt[x]]])< 10^(-5)), AppendTo[a, x]], {x, 1, 1000}]; a
%Y A127024 Cf. A035484, A127022, A127023, A127025.
%K A127024 nonn
%O A127024 1,1
%A A127024 _Artur Jasinski_, Jan 03 2007
%E A127024 a(6)-a(32) from _Jon E. Schoenfield_, Sep 04 2017