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

Author

Eric W. Weisstein, Oct 26 2004

Keywords

• nonn
• hard
• more

Comments

See A229230 for another version.

Links

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

Crossrefs

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

Programs

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 *)

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).