Image may be NSFW.
Clik here to view.
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 ArticleTrouble 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
More Pages to Explore .....
