OFFSET
1,1
EXAMPLE
2.08907042748104151995680405675152602941165404000342...
MATHEMATICA
RealDigits[x /. FindRoot[PolyGamma[x] == 1/x, {x, 2}, WorkingPrecision -> 120]][[1]] (* Amiram Eldar, Jan 19 2026 *)
PROG
(PARI) solve(x=2.0, 3.0, psi(x) - 1/x) \\ Andrew Howroyd, Jan 19 2026
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Sinden Miller, Jan 19 2026
STATUS
approved
