OFFSET
1,2
COMMENTS
The equation sin(x) = arctan(x) has a unique positive root x_0. Note that arctan(x) < sin(x) for x in (-oo, -x_0) U (0, x_0) and arctan(x) > sin(x) for x in (-x_0, 0) U (x_0, +oo).
EXAMPLE
sin(1.5570858155...) = arctan(1.5570858155...) = 0.9999060124...
MATHEMATICA
RealDigits[x /. FindRoot[Sin[x] == ArcTan[x], {x, 3/2}, WorkingPrecision -> 100], 10, 90][[1]] (* Amiram Eldar, Oct 10 2021 *)
PROG
(PARI) solve(x=1.55, 1.57, atan(x)-sin(x))
CROSSREFS
Cf. A348294 (y-coordinate).
KEYWORD
nonn,cons
AUTHOR
Jianing Song, Oct 10 2021
STATUS
approved