[go: up one dir, main page]

login
A332523
Numerators of convergents to 2 Pi + Dottie number (A332506).
3
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,1
EXAMPLE
d = FindRoot[Cos[u] == 2 Pi - u, {u, 0, 1}, WorkingPrecision -> 10000][[1, -1]];
Numerator[Convergents[d, 100]] (* A332523 *)
Denominator[Convergents[d, 100]] (* A332524 *)
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
KEYWORD
nonn,frac
AUTHOR
Clark Kimberling, May 05 2020
STATUS
approved