

A184952


High water marks in A177413


1



0, 1, 2, 4, 40, 52, 82, 4839, 5813, 8366, 11153, 46254, 1040968, 12925493
(list;
graph;
refs;
listen;
history;
text;
internal format)



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



