OFFSET
1,1
COMMENTS
Also the second positive root of the equation Psi(x)^2-Psi(1,x)=0.
Function 1/Gamma(x) has only two inflection points on the interval x=[0,infinity): 0.30214172... (A268464) and 2.4956029... (this sequence).
EXAMPLE
2.4956029635171933815428456493853820634653641719500480...
MAPLE
Digits:= 150: fsolve(Psi(x)^2-Psi(1, x)=0, x=2.5);
MATHEMATICA
FindRoot[PolyGamma[x]^2-PolyGamma[1, x]==0, {x, 2.5}, WorkingPrecision -> 120][[1, 2]] // RealDigits[#, 10, 103]& // First
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Iaroslav V. Blagouchine, Feb 18 2016
STATUS
approved