A332524 Denominators of convergents to 2 Pi + Dottie number (A332506).

1, 1, 2, 11, 57, 68, 805, 873, 1678, 9263, 10941, 293729, 598399, 6876118, 7474517, 14350635, 36175787, 50526422, 137228631, 13224474998, 13361703629, 26586178627, 39947882256, 66534060883, 106481943139, 40849118283120, 245201191641859, 286050309924979

Offset

0,3

Links

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

Mathematica

d = FindRoot[Cos[u] == 2 Pi - u, {u, 0, 1}, WorkingPrecision -> 10000][[1, -1]];
Numerator[Convergents[d, 100]]    (* A332523 *)
Denominator[Convergents[d, 100]]  (* A332524 *)

Crossrefs

Cf. A332523, A332506, A212112, A223957, A332500.

Sequence in context: A361219 A213098 A041129 * A037490 A037570 A240888

Adjacent sequences: A332521 A332522 A332523 * A332525 A332526 A332527

Keyword

nonn,frac

Author

Clark Kimberling, May 05 2020

Status

approved