login
A226750
Decimal expansion of the number x other than -3 defined by x*e^x = -3/e^3.
16
1, 7, 8, 5, 6, 0, 6, 2, 7, 8, 7, 7, 9, 2, 1, 1, 0, 6, 5, 9, 6, 8, 0, 8, 6, 6, 9, 7, 0, 5, 5, 1, 4, 8, 0, 4, 6, 5, 4, 1, 1, 8, 2, 5, 5, 9, 2, 6, 8, 8, 5, 9, 0, 7, 7, 2, 0, 1, 4, 2, 3, 0, 6, 0, 5, 8, 7, 8, 5, 6, 9, 5, 4, 9, 4, 4, 8, 2, 6, 0, 8, 7, 5, 4, 3, 1, 3, 4, 3, 4, 6, 5, 2, 1, 6, 0, 3, 5, 5, 6, 1, 0, 4, 0, 0
OFFSET
0,2
LINKS
EXAMPLE
-0.178560627877921106596808669705514804654118255926885907720142306058785...
MATHEMATICA
RealDigits[N[ProductLog[-3/e^3], 105]][[1]]
PROG
(PARI) solve(x=0, 1, 3/exp(3)-x*exp(-x)) \\ Charles R Greathouse IV, Nov 19 2013
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
EXTENSIONS
Term a(104) corrected by G. C. Greubel, Nov 16 2017
STATUS
approved