A016458 Continued fraction for log(30).
3, 2, 2, 33, 160, 1, 2, 51, 1, 3, 22, 1, 7, 1, 2, 4, 7, 7, 1, 1, 1, 5, 4, 2, 18, 3, 12, 1, 2, 1, 1, 2, 1, 2, 1, 1, 1, 2, 1, 5, 2, 7, 2, 1, 2, 2, 5, 4, 2, 1, 1, 3, 1, 2, 2, 12, 1, 1, 4, 2, 1, 1, 2, 2, 4, 2, 2, 3, 3, 2, 1, 3, 2, 2, 3, 1, 1, 1, 11
Offset: 1
Examples
3.401197381662155375413236... = 3 + 1/(2 + 1/(2 + 1/(33 + 1/(160 + ...)))). - _Harry J. Smith_, May 20 2009
Links
- Harry J. Smith, Table of n, a(n) for n = 1..20000
Crossrefs
Cf. A016653 Decimal expansion. - Harry J. Smith, May 20 2009
Programs
-
Mathematica
ContinuedFraction[Log[30], 100] (* Paolo Xausa, Mar 22 2024 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(log(30)); for (n=1, 20000, write("b016458.txt", n, " ", x[n])); } \\ Harry J. Smith, May 20 2009