OFFSET
1,3
FORMULA
x=1.1909470770360772560; x^(8^x)=8
MATHEMATICA
RealDigits[x/.FindRoot[x^(8^x)==8, {x, 1}, WorkingPrecision->130], 10, 120][[1]] (* Harvey P. Dale, Jun 03 2020 *)
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Zak Seidov, Mar 23 2005
EXTENSIONS
Corrected and extended by Harvey P. Dale, Jun 03 2020
a(120) corrected by Georg Fischer, Aug 05 2021
STATUS
approved