OFFSET
1,1
FORMULA
x=3.0963639324106461...
MATHEMATICA
RealDigits[ FindRoot[Sin[x] - Exp[ -x] == 0, {x, Pi}, WorkingPrecision -> 2^7][[1, 2]]][[1]] (* Robert G. Wilson v, Mar 26 2005 *)
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Zak Seidov, Mar 25 2005
EXTENSIONS
More terms from Robert G. Wilson v, Mar 26 2005
STATUS
approved