OFFSET
0,1
COMMENTS
The smaller of the two real roots of 1 - 3*x + log(x)*(log(x) + 2*x - 2) = 0. - Amiram Eldar, Jun 17 2021
LINKS
Eric Weisstein's World of Mathematics, Steiner's Problem.
EXAMPLE
0.581932705...
MATHEMATICA
f[x_] := x^(1/x); RealDigits[ x /. FindRoot[ f''[x] == 0, {x, 1/2}, WorkingPrecision -> 102]] // First (* Jean-François Alcover, Feb 08 2013 *)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Eric W. Weisstein, Mar 25 2004
STATUS
approved