A058283 Continued fraction for e^4.
54, 1, 1, 2, 21, 4, 1, 1, 57, 2, 1, 9, 1, 1, 13, 6, 2, 20, 2, 4, 1, 17, 1, 3, 2, 7, 2, 1, 1, 1, 1, 3, 2, 1, 11, 4, 2, 1, 3, 2, 1, 7, 1, 7, 1, 12, 2, 8, 7, 6, 1, 2, 1, 7, 2, 37, 2, 3, 66, 1, 1, 1, 2, 1, 2, 1, 1, 2, 1, 1, 1, 1, 2, 3, 1, 1, 2, 10, 18, 2, 19, 4, 2, 1, 9, 1, 9, 2, 1, 1, 1, 1, 4
Offset: 0
Examples
54.598150033144239078110261... = 54 + 1/(1 + 1/(1 + 1/(2 + 1/(21 + ...)))). - _Harry J. Smith_, Jun 22 2009
Links
- Harry J. Smith, Table of n, a(n) for n = 0..20000
Crossrefs
Cf. A092426 Decimal expansion. - Harry J. Smith, Jun 22 2009
Programs
-
Mathematica
ContinuedFraction[ E^4, 100]
-
PARI
default(realprecision,1000); contfrac((exp(1))^4)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(exp(1)^4); for (n=0, 20000, write("b058283.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jun 22 2009
Extensions
More terms from R. K. Guy, Jun 15 2001