OFFSET
0,1
EXAMPLE
-0.29883472...
MATHEMATICA
RealDigits[x/.FindRoot[Zeta[x]==Sin[x], {x, -.5}, WorkingPrecision->120]] [[1]] (* Harvey P. Dale, Feb 24 2017 *)
PROG
(PARI) solve(x=-1, 0, zeta(x)-sin(x)) \\ Michel Marcus, Feb 16 2021
CROSSREFS
KEYWORD
AUTHOR
Benoit Cloitre, Apr 30 2002
STATUS
approved