login
A090625
Decimal expansion of real solution of x^x = 10.
7
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
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
KEYWORD
nonn,cons,easy
AUTHOR
Klaus Brockhaus, Feb 02 2004
STATUS
approved