OFFSET
1,2
EXAMPLE
1.30296400121601255253211430697335802538621997810467...
MATHEMATICA
RealDigits[ FindRoot[ Log[x] == Cos[x], {x, {2, 3}}, WorkingPrecision -> 120][[1, 2, 1]], 10, 111][[1]]
PROG
(PARI) solve(x=1, 2, log(x)-cos(x)) \\ Charles R Greathouse IV, Oct 29 2021
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Denton J. Dailey (djd1497(AT)aol.com), Jan 06 2007
STATUS
approved