A332523
Numerators of convergents to 2*Pi + Dottie number (A332506).
Original entry on oeis.org
5, 6, 11, 61, 316, 377, 4463, 4840, 9303, 51355, 60658, 1628463, 3317584, 38121887, 41439471, 79561358, 200562187, 280123545, 760809277, 73317814137, 74078623414, 147396437551, 221475060965, 368871498516, 590346559481, 226471603779739, 1359419969237915
Offset: 0
-
d = FindRoot[Cos[u] == 2 Pi - u, {u, 0, 1}, WorkingPrecision -> 10000][[1, -1]];
Numerator[Convergents[d, 100]] (* A332523 *)
Denominator[Convergents[d, 100]] (* A332524 *)
A332524
Denominators of convergents to 2 Pi + Dottie number (A332506).
Original entry on oeis.org
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
-
d = FindRoot[Cos[u] == 2 Pi - u, {u, 0, 1}, WorkingPrecision -> 10000][[1, -1]];
Numerator[Convergents[d, 100]] (* A332523 *)
Denominator[Convergents[d, 100]] (* A332524 *)
Showing 1-2 of 2 results.