New in Wolfram Mathematica 7: Transcendental Roots ◄ previous | next ►
Solve an Equation Involving Exp and Log over the Reals
Mathematica 7 finds all real solutions of a univariate equation involving arbitrary compositions of Exp and Log.
In[1]:=

Click for copyable input
f = Exp[x]/(1 + x) - x^2 Log[x];

rts = Reduce[f == 0, x, Reals]
Out[1]=



In[2]:=

Click for copyable input
Plot[f, {x, 0, 7}, 

 Epilog -> {Red, PointSize[0.025], Point[{x, f}] /. {ToRules[rts]}}]
Out[2]=