| Author |
Comment/Response |
yehuda
|
 12/02/12 08:51am
I would like to generalize this a little bit
in many practical cases you cannot "inverse" the function, not you want to evaluate it again just to get the plot of the inverse.
The result of the graphics generated by Plot is all you need
g = Plot[0.4 (x^-0.6)*(x^0.4 - 1), {x, .1, 10}]
Then you just extract the data (in your case it is preferred to use Graphics because of the different scale of the axes
Graphics[Cases[g, Line[x_] :> Line[Reverse /@ x], \[Infinity]],
Axes -> True, AspectRatio -> 1/GoldenRatio, AxesOrigin -> {0, 0}]
yehuda
URL: , |
|
