OFFSET
1,1
COMMENTS
Related to the shared tangents of y = exp(x) and y = log(x). For more details, see A263356.
LINKS
Stanislav Sykora, Table of n, a(n) for n = 1..2000
FORMULA
Equals exp(A263356).
EXAMPLE
4.680498579882905602275950337837266791401032479590099720047090119413...
The inverse of this, used in A263356, is
0.213652452390022411936054015235995011478174365311570610900850075919...
MATHEMATICA
RealDigits[x/.FindRoot[(x (Log[x]-1))/(Log[x]+1)==1, {x, 4}, WorkingPrecision-> 120], 10, 120][[1]] (* Harvey P. Dale, Apr 23 2022 *)
PROG
(PARI) solve(x=1, 10, x*(log(x)-1)/(log(x)+1)-1)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Stanislav Sykora, Oct 16 2015
STATUS
approved