login
A372958
Decimal expansion of the least positive solution of cos(x) - sin(x) = 4/3.
5
5, 1, 5, 7, 9, 5, 0, 2, 3, 4, 3, 2, 8, 0, 1, 6, 2, 3, 0, 2, 1, 3, 2, 3, 3, 4, 0, 7, 3, 4, 7, 3, 6, 5, 9, 8, 0, 9, 5, 6, 8, 0, 1, 7, 5, 8, 5, 7, 3, 9, 7, 7, 1, 1, 5, 2, 7, 4, 2, 2, 9, 0, 7, 4, 0, 4, 8, 7, 6, 2, 8, 2, 2, 3, 3, 6, 0, 1, 7, 3, 3, 6, 1, 3, 8
OFFSET
1,1
FORMULA
Equals 2*(Pi - arctan((3 + sqrt(2))/7)). - Vaclav Kotesovec, Jul 08 2024
EXAMPLE
5.1579502343280162302132334073473659809568017585739771152742290...
MATHEMATICA
f = FindRoot[Cos[ x] - Sin[ x ] == 4/3, {x, {5, 6}}, WorkingPrecision -> 500][[1, 2]][[1]]
RealDigits[f][[1]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, Jul 07 2024
STATUS
approved