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 A127028 #6 Sep 04 2017 19:27:56
%S A127028 148,268,652,1194,1332,1519,2608,5650,5774,5868,6632,7260,9058,10153,
%T A127028 10210,11076,12314,13049,13097,14370,15696,16170,18736,19571,21655,
%U A127028 21814,22905,23325,24496,27435,28201,29239,31214,34218,36166,36287,38805,38990,42761
%N A127028 Let f(n) = exp(Pi*sqrt(n)); sequence gives numbers n such that f(n) - floor(f(n)) < 1/10^3.
%t A127028 a = {}; Do[If[((Exp[Pi Sqrt[x]] - Floor[Exp[Pi Sqrt[x]]]) > 0) && (( Exp[Pi Sqrt[x]] - Floor[Exp[Pi Sqrt[x]]])< 10^(-3)), AppendTo[a, x]], {x, 1, 1000}]; a
%Y A127028 Cf. A035484, A127022, A127023, A127024, A127025, A127026, A127027, A127029, A127030.
%K A127028 nonn
%O A127028 1,1
%A A127028 _Artur Jasinski_, Jan 03 2007
%E A127028 a(7)-a(39) from _Jon E. Schoenfield_, Sep 04 2017