Hi all,
Do anyone know how Mathematica computes Inverse of a function using InverseFunction? The details of my issue are provided below:
First Issue:
I would like to evaluate the following:
Table[InverseFunction[(0.203*Log[#] - 0.218*Log[0.015 - 0.203*#])/0.015 &][i], {i, 1, 20, 1}]
There is no problem in computing the above. I get the answer to this almost instantly. But I couldn't evaluate the same function when my input is 201. i.e., When I do the following, Mathematica couldn't find an answer.
InverseFunction[(0.203Log[#] - 0.218Log[0.015 - 0.203*#])/ 0.015 &][201]
Second Issue:
Solving the Inverse function for 20 values takes almost no time. i.e., the following :
Table[InverseFunction[(0.203*Log[#] - 0.218*Log[0.015 - 0.203*#])/0.015 &][i], {i, 1, 20, 1}]
But if I try to evaluate the same using solve, it takes a long time even to Solve for a single value. i.e.,
Solve[-0.218Log[0.015 - 0.203 x] + 0.203*Log[x] == 3, x]
Please help me out what I'm missing and why the computations are taking time when I try evaluating the same using Solve and also why Mathematica couldn't evaluate the function value at certain points such as 201?