Quantcast
Channel: Trouble finding inverse of a function - Mathematica Stack Exchange
Browsing index pages (2 articles)

Trouble finding inverse of a function

I have the following Mathematica code:f[U_] = 1 - (Un/U)^3; Un = 1;L[Us_] := 3 NIntegrate[ Us^(5/2)/U^(3/2) Sqrt[f[Us]/f[U]] 1/ Sqrt[U^5 f[U] - Us^5 f[Us]], {U, Us, Infinity}]UsvsL = Table[{Us, L[Us]},...

View Article


Image may be NSFW.
Clik here to view.

Answer by Daniel Huber for Trouble finding inverse of a function

Look at your data:ListLinePlot[UsvsL, AxesLabel -> {"U", "L"}]Note that for some Ls there two Us. Therefore the inverse function is not single valued. We therefore create two inverse functions, One...

View Article

Browsing index pages (2 articles)


Latest Images