A016476 Continued fraction for log(48).
3, 1, 6, 1, 3, 4, 4, 1, 13, 2, 4, 1, 22, 3, 2, 7, 3, 4, 1, 3, 4, 7, 11, 2, 1, 39, 1, 1, 1, 7, 8, 3, 1, 5, 4, 2, 6, 1, 1, 4, 35, 2, 45, 2, 1, 1, 6, 2, 1, 1, 3, 1, 3, 1, 13, 1, 3, 3, 26, 2, 17, 1, 1, 3, 1, 45, 1, 5, 1, 1, 1, 3, 2, 2, 1, 3, 4
Offset: 1
Examples
3.871201010907890929064173722... = 3 + 1/(1 + 1/(6 + 1/(1 + 1/(3 + ...)))). - _Harry J. Smith_, May 21 2009
Links
- Harry J. Smith, Table of n, a(n) for n = 1..20000
Crossrefs
Cf. A016671 (decimal expansion).
Programs
-
Mathematica
ContinuedFraction[Log[48], 100] (* Paolo Xausa, Mar 25 2024 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(log(48)); for (n=1, 20000, write("b016476.txt", n, " ", x[n])); } \\ Harry J. Smith, May 21 2009