A016447 Continued fraction for log(19).
2, 1, 16, 1, 563, 1, 3, 1, 2, 1, 1, 7, 1, 2, 89, 1, 5, 2, 1, 31, 5, 3, 1, 1, 3, 1, 1, 31, 1, 1, 43, 1, 1, 14, 1, 1, 8, 2, 7, 2, 1, 2, 25, 1, 5, 165, 1, 4, 7, 1, 16, 1, 17, 1, 12, 29, 1, 1, 1, 1, 1, 6, 4, 1, 1, 1, 3, 1, 9, 5, 3, 3, 1, 1, 14, 2, 4, 1, 2, 2, 4, 1, 2, 1, 2, 4, 2, 1, 11, 2, 1, 1, 1, 2, 1, 3, 3
Offset: 1
Examples
2.944438979166440460009027... = 2 + 1/(1 + 1/(16 + 1/(1 + 1/(563 + ...)))) \\ _Harry J. Smith_, May 17 2009
Links
- Harry J. Smith, Table of n, a(n) for n = 1..20000
Crossrefs
Cf. A016642 Decimal expansion. - Harry J. Smith, May 17 2009
Programs
-
Mathematica
ContinuedFraction[Log[19], 100] (* Stefan Steinerberger, Apr 11 2006 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(log(19)); for (n=1, 20000, write("b016447.txt", n, " ", x[n])); } \\ Harry J. Smith, May 17 2009