A184952 High water marks in A177413

0, 1, 2, 4, 40, 52, 82, 4839, 5813, 8366, 11153, 46254, 1040968, 12925493

Offset

0,3

Comments

12925493 does not appear in A177413 until n=292558.

Links

Table of n, a(n) for n=0..13.

Eric Weisstein's World of Mathematics, Dottie Number

Example

The first few terms of the continued fraction of the Dottie number are 0, 1, 2, 1, 4, 1, 40 of which the high water marks are 0, 1, 2, 4, 40...

Mathematica

z = x /. FindRoot[x == Cos[x], {x, 0},
   WorkingPrecision -> 100000]; data = ContinuedFraction[z];
g[list_] :=
Delete[list,
  Transpose[{DeleteCases[
     Table[If[list[[n]] < list[[n - 1]], n, no], {n, 2,
       Length[list]}], no]}]];

Crossrefs

Cf. A177413, A003957.

Sequence in context: A098625 A057777 A139735 * A098337 A326483 A187468

Adjacent sequences: A184949 A184950 A184951 * A184953 A184954 A184955

Keyword

nonn,cofr,hard,more

Author

Ben Branman, Dec 21 2011

Status

approved