A090625 Decimal expansion of real solution of x^x = 10.

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

Offset

1,1

References

Clifford A. Pickover, A Passion for Mathematics, John Wiley & Sons, Inc., 2005, p. 90.

Links

Ivan Panchenko, Table of n, a(n) for n = 1..1000

Formula

x = log(10)/LambertW(log(10)). - Alois P. Heinz, Sep 07 2014

Example

2.5061841455...

Mathematica

x=10; RealDigits[Log[x]/ProductLog[Log[x]], 10, 6! ][[1]] (* Vladimir Joseph Stephan Orlovsky, Feb 11 2010 *)

Prog

(PARI) solve(X=2, 3, X^X-10) \\ Michel Marcus, Sep 07 2014
(PARI) log(10)/lambertw(log(10)) \\ G. C. Greubel, Nov 14 2017

Crossrefs

Sequence in context: A058204 A242969 A268886 * A021403 A299623 A290796

Adjacent sequences: A090622 A090623 A090624 * A090626 A090627 A090628

Keyword

nonn,cons,easy

Author

Klaus Brockhaus, Feb 02 2004

Status

approved