OFFSET
1,2
EXAMPLE
1.393091545385710592226140783294461940981161317845356960802924...
MATHEMATICA
RealDigits[x /. FindRoot[x^(x + 3) == x^x + x^3, {x, 3/2}, WorkingPrecision -> 120]][[1]] (* Amiram Eldar, Jun 18 2023 *)
PROG
(PARI) solve(x=1, 2, x^(x+3)-x^x-x^3)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Patrick C. Schneider, Aug 18 2018
STATUS
approved