OFFSET
1,1
COMMENTS
a(212)=195246501 is the smallest integer such that the fractional part of e^(Pi*sqrt(n)) begins with exactly 8 zeros. - Anthony Canu, Oct 11 2017
LINKS
Anthony Canu, Table of n, a(n) for n = 1..217
EXAMPLE
5 is not in the sequence since exp(Pi*sqrt(5)) = 1124.186... has fractional part 0.186... which is greater than 1/10^6. But exp(Pi*sqrt(652)) has fractional part 0.0000000001637... which is less than 1/10^6, so 652 is in the sequence. - Michael B. Porter, Aug 24 2016
MATHEMATICA
$MaxExtraPrecision = 1000; a = {}; Do[If[((Exp[Pi Sqrt[x]] - Floor[Exp[Pi Sqrt[x]]]) > 0) && ((Exp[Pi Sqrt[x]] - Floor[Exp[Pi Sqrt[x]]]) < 10^(-6)), AppendTo[a, x]], {x, 1, 100000}]; a
PROG
(PARI) search(a, b)=my(t, prec=default(realprecision), nprec=round(Pi*sqrt(b)/log(10)+20)); default(realprecision, nprec); for(n=floor(a), b, t=exp(Pi*sqrt(n)); if(t-floor(t)<.000001, print(n))); default(realprecision, prec) \\ Charles R Greathouse IV, Jul 28 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Jan 03 2007
EXTENSIONS
a(3)-a(14) from Charles R Greathouse IV, Jul 28 2009
a(15)-a(18) from Anthony Canu, Aug 24 2016
a(19) from Anthony Canu, Aug 31 2016
a(20)-a(28) from Anthony Canu, Mar 03 2017
STATUS
approved