A394652 - OEIS

%I #26 Apr 19 2026 04:43:43

%S 1,4,3,6,0,7,8,2,7,5,4,7,8,5,0,0,5,9,2,3,3,1,0,8,8,3,8,5,0,2,8,8,6,3,

%T 9,7,6,3,2,1,8,7,4,0,8,3,0,2,5,4,0,1,0,4,9,1,5,8,1,5,8,6,7,1,1,6,2,8,

%U 3,8,0,5,3,9,4,5,1,7,2,1,0,0,7,7,0,2,6,9,0,9,6,5,2,4,2,5,9,4,0,1

%N Decimal expansion of the real solution to x = (x-1)^(1-x), x > 1.

%F Equals 1 + 1/A085846.

%e 1.43607827547850059233108838502886397...

%t RealDigits[x /. FindRoot[(x - 1)^(1 - x) == x, {x, 3/2}, WorkingPrecision -> 120]][[1]] (* _Amiram Eldar_, Apr 19 2026 *)

%o (PARI) solve(x=1.1, 2, (x-1)^(1-x)-x) \\ _Stefano Spezia_, Mar 27 2026

%Y Cf. A085846.

%K nonn,cons

%O 1,2

%A _Alexander Aultman_, Mar 26 2026