A099804 Records for terms in the continued fraction of Soldner's constant.

1, 2, 4, 47, 99, 294, 527, 616, 1152, 1456, 2638, 2705, 4105, 31772, 88683, 90658, 95845, 237245, 1387437, 5499408, 12672729, 110482114

Offset

1,2

Links

Table of n, a(n) for n=1..22.

Eric Weisstein's World of Mathematics, Soldner's Constant Continued Fraction

Mathematica

f = FindRoot[LogIntegral@x, {x, 3/2}, WorkingPrecision -> 2^17][[1, 2]]; cf = ContinuedFraction@f; k = 1; mx = 0; lst = {}; len = Length@ cf; While[k < len, If[cf[[k]] > mx, mx = cf[[k]]; AppendTo[lst, cf[[k]]]]; k++ ]; lst (* Robert G. Wilson v, Aug 05 2010 *)

Crossrefs

Cf. A070769 (decimal expansion of Soldner's constant).

Cf. A099805, A229230.

Sequence in context: A105282 A348247 A018325 * A019596 A088301 A212429

Adjacent sequences: A099801 A099802 A099803 * A099805 A099806 A099807

Keyword

nonn,hard,more,changed

Author

Eric W. Weisstein, Oct 26 2004

Extensions

a(15) from Robert G. Wilson v, Aug 05 2010

More terms from Eric W. Weisstein, Sep 16 2013

a(21)-a(22) from Eric W. Weisstein, Oct 07 2013

Status

approved