A099805 Positions of records for terms in the continued fraction of Soldner's constant (A070769).

1, 2, 3, 12, 70, 126, 202, 585, 1592, 2436, 2544, 4814, 9603, 12148, 122447

Offset

1,2

Comments

See A229230 for another version.

Links

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

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

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, k]]; k++ ]; lst (* Robert G. Wilson v, Aug 05 2010 *)

Crossrefs

Cf. A229230 (= a(n) - 1), A070769, A099804.

Sequence in context: A013152 A012911 A264726 * A009269 A012396 A013012

Adjacent sequences: A099802 A099803 A099804 * A099806 A099807 A099808

Keyword

nonn,hard,more

Author

Eric W. Weisstein, Oct 26 2004

Extensions

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

Edited by N. J. A. Sloane, Jun 19 2021 (removed mention of a(0) from definition).

Status

approved