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 A127023 #8 Sep 04 2017 19:27:33
%S A127023 37,58,67,163,232,719,1169,1467,4075,5773,19183,33563,65477,67893,
%T A127023 68996,70273,81194,90857,106194,112070,117434,120332,122456,133074,
%U A127023 167196,210500,226081,254883,261084,263987,270154,281128,298455,301487,313447,321349,325779
%N A127023 Let f(n) = exp(Pi*sqrt(n)); sequence gives numbers n such that ceiling(f(n)) - f(n) < 1/10^4.
%t A127023 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^(-4)), AppendTo[a, x]], {x, 1, 1000}]; a
%Y A127023 Cf. A035484, A127022, A127024, A127025.
%K A127023 nonn
%O A127023 1,1
%A A127023 _Artur Jasinski_, Jan 03 2007
%E A127023 a(9)-a(37) from _Jon E. Schoenfield_, Sep 04 2017