A016538 Continued fraction for log(21/2).
2, 2, 1, 5, 2, 30, 10, 2, 1, 1, 1, 1, 38, 1, 1, 1, 1, 6, 2, 2, 1, 26, 1, 1, 2, 2, 2, 1, 42, 2, 2, 1, 5, 2, 2, 7, 1, 1, 2, 5, 1, 1, 3, 1, 1, 1, 1, 1, 4, 1, 2, 2, 1, 1, 5, 2, 3, 1, 1, 1, 2, 9, 1, 1, 2, 1, 3, 2, 1, 1, 7, 2, 3, 2, 2, 2, 1, 21, 1
Offset: 1
Examples
2.351375257163477687083365858... = 2 + 1/(2 + 1/(1 + 1/(5 + 1/(2 + ...)))). - _Harry J. Smith_, May 26 2009
Links
- Harry J. Smith, Table of n, a(n) for n = 1..20000
- G. Xiao, Contfrac
Crossrefs
Cf. A016587 Decimal expansion. - Harry J. Smith, May 26 2009
Programs
-
Mathematica
ContinuedFraction[Log[21/2],80] (* Harvey P. Dale, Jun 19 2013 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(log(21/2)); for (n=1, 20000, write("b016538.txt", n, " ", x[n])); } \\ Harry J. Smith, May 26 2009