login
This site is supported by donations 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

Table of n, a(n) for n=1..31.

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

Cf. A035484, A127022, A127023, A127024, A127025, A127026, A127027, A127028, A127029.

Sequence in context: A261552 A002232 A127029 * A127031 A204511 A204506

Adjacent sequences:  A127027 A127028 A127029 * A127031 A127032 A127033

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 | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified February 25 08:12 EST 2018. Contains 299646 sequences. (Running on oeis4.)