A060456 a(n) = floor(exp(Pi*sqrt(n))).

1, 23, 85, 230, 535, 1124, 2197, 4071, 7228, 12391, 20631, 33506, 53252, 83047, 127358, 192400, 286751, 422150, 614551, 885479, 1263794, 1787960, 2508951, 3493969, 4831163, 6635623, 9056943, 12288743, 16580630, 22253151, 29716459

Offset: 0

Author

Jason Earls, Apr 08 2001

Keywords

• easy
• nonn

Comments

Some of these values are very close to integers; e.g., a(17)= 422150.9976756804516....

Links

• Harry J. Smith, Table of n, a(n) for n = 0..1000

Programs

Maple

Digits := 100; for n from 0 to 40 do printf(`%d,`,floor( exp(Pi*sqrt(n)))) od:

Mathematica

Table[Floor[Exp[Pi Sqrt[n]]],{n,0,40}] (* Harvey P. Dale, Aug 26 2020 *)

PARI

{ default(realprecision, 100); for (n=0, 1000, write("b060456.txt", n, " ", floor(exp(Pi*sqrt(n)))); ) } \\ Harry J. Smith, Jul 05 2009

Extensions

More terms from James Sellers, Apr 11 2001