OFFSET
1,3
EXAMPLE
x=1.179067994130546711326627268870672714247363863698857908913601448...
MATHEMATICA
RealDigits[ FindRoot[x^(9^x) == 9, {x, 1}, WorkingPrecision -> 2^7] [[1, 2]]][[1]] (* Robert G. Wilson v, Mar 26 2005 *)
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Zak Seidov, Mar 23 2005
EXTENSIONS
More terms from Robert G. Wilson v, Mar 26 2005
STATUS
approved