A018939 Continued fraction for e^Pi - Pi.
19, 1, 1110, 11, 1, 2, 2, 2, 2, 1, 61, 3, 2083, 1, 2, 1, 2, 3, 1, 2, 9, 2, 28, 1, 3, 2, 2, 10, 3, 1, 3, 1, 1, 1, 4, 14, 1, 2, 2, 1, 1, 20, 2, 12, 1, 25, 1, 37, 1, 18, 1, 1, 1, 1, 6, 2, 1, 1, 150, 1, 2, 11, 1, 8, 1, 1, 11, 3, 19, 7, 1, 3, 7, 1, 151, 1, 4, 1, 12, 8, 1, 1, 182, 1, 12, 3, 7, 1, 22, 2
Offset: 0
Examples
19.9990999791894757672664429846690444960689368432251061724701018172... 19.999099979189475767266... = 19 + 1/(1 + 1/(1110 + 1/(11 + 1/(1 + ...)))). - _Harry J. Smith_, May 14 2009
Links
- Harry J. Smith, Table of n, a(n) for n = 0..19999
- G. Xiao, Contfrac
- Index entries for continued fractions for constants
Crossrefs
Cf. A018938 (decimal expansion).
Programs
-
Mathematica
ContinuedFraction[E^Pi-Pi,90] (* Harvey P. Dale, Dec 17 2011 *)
-
PARI
contfrac(exp(1)^Pi-Pi)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(exp(1)^Pi-Pi); for (n=1, 20000, write("b018939.txt", n-1, " ", x[n])); } \\ Harry J. Smith, May 14 2009
Extensions
More terms from Jason Earls, Jul 24 2001
Offset changed by Andrew Howroyd, Aug 07 2024
Comments