login
A379799
Decimal expansion of solution to 2^x + x = 5.
0
1, 7, 1, 5, 6, 2, 0, 7, 3, 3, 2, 7, 5, 5, 8, 6, 1, 6, 9, 3, 8, 0, 9, 1, 6, 4, 2, 8, 2, 1, 0, 1, 1, 5, 4, 0, 5, 3, 4, 9, 2, 0, 1, 5, 4, 2, 4, 0, 2, 6, 9, 3, 7, 7, 6, 2, 1, 6, 1, 3, 5, 0, 3, 6, 7, 8, 9, 9, 5, 9, 3, 4, 6, 0, 7, 8, 7, 6, 9, 6, 3, 7, 1, 6, 8, 0, 4, 6, 6, 8, 6, 1, 6, 9, 2, 4, 4, 5, 4, 7, 0, 9, 7, 0, 9, 6, 7, 5, 8
OFFSET
1,2
FORMULA
Equals 5 - LambertW(32*log(2))/log(2). - Vaclav Kotesovec, Jan 19 2025
EXAMPLE
1.715620733275586169380916428210115405349201542402693776216135036789959346...
MAPLE
evalf[140](solve(2^x+x-5, x)); # Alois P. Heinz, Jan 30 2025
MATHEMATICA
RealDigits[5 - LambertW[32*Log[2]]/Log[2], 10, 110][[1]] (* Vaclav Kotesovec, Jan 19 2025 *)
PROG
(PARI) 5 - lambertw(32*log(2))/log(2) \\ Michel Marcus, Jan 19 2025
CROSSREFS
Sequence in context: A011478 A334072 A118307 * A351738 A178757 A388622
KEYWORD
nonn,cons
AUTHOR
N. J. A. Sloane, Jan 19 2025
STATUS
approved