login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A127030 Let f(n) = exp(Pi*sqrt(n)); sequence gives numbers n such that f(n) - floor(f(n)) < 1/10^5. 4
652, 2608, 22905, 54295, 95041, 160874, 184867, 470884, 470884, 613399, 674707, 798611, 880111, 895056, 914998, 1024331, 1027117, 1623312, 1678362, 1699773, 1720078, 1826945, 1830202, 2025665, 2089347, 2092092, 2097388, 2133524, 2375222, 2471017, 2614646 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
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^(-5)), AppendTo[a, x]], {x, 1, 100000}]; a
CROSSREFS
Sequence in context: A261552 A002232 A127029 * A127031 A204511 A204506
KEYWORD
nonn
AUTHOR
Artur Jasinski, Jan 03 2007
EXTENSIONS
a(6)-a(31) from Jon E. Schoenfield, Sep 04 2017
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 23 06:39 EDT 2024. Contains 373629 sequences. (Running on oeis4.)