Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #36 Nov 30 2016 05:58:38
%S 9,9,1,1,2,0,1,4,7,9,9,1,8,7,7,4,0,4,6,9,5,2,5,2,3,9,8,9,0,4,7,7,4,4,
%T 1,8,7,2,5,9,9,7,7,6,4,1,9,5,1,3,1,5,7,5,6,7,2,3,7,3,1,2,9,2,5,9,5,2,
%U 5,4,7,5,9,9,9,8,2,5,0,9,0,9,0,5,3,1,6,5
%N Decimal expansion of the real part of the root of the function x^y = y.
%C This value is negative.
%C It is not known if this number has a closed form.
%C This root occurs on the real component of the function x^y = y for x values which are all real.
%F Original fixed point function is of the form: x^y = y. When solved for y: y = -ProductLog(-log(x))/log(x).
%e -99.1120147991877404695252398904774418725997764195131575672373129...
%t FindRoot[Re[-ProductLog[-Log[x]]/Log[x]], {x, -100, -99}, WorkingPrecision -> 261]
%Y Cf. A277067.
%K nonn,cons
%O 2,1
%A _David D. Acker_, Sep 27 2016