Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A060456
a(n) = floor(exp(Pi*sqrt(n))).
2
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,2
COMMENTS
Some of these values are very close to integers; e.g., a(17)= 422150.9976756804516....
LINKS
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 *)
PROG
(PARI) { default(realprecision, 100); for (n=0, 1000, write("b060456.txt", n, " ", floor(exp(Pi*sqrt(n)))); ) } \\ Harry J. Smith, Jul 05 2009
CROSSREFS
Sequence in context: A104068 A304839 A229449 * A056580 A010011 A172117
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Apr 08 2001
EXTENSIONS
More terms from James A. Sellers, Apr 11 2001
STATUS
approved