An exponential decay curve has been plotted asymptoting at approximately x=30 (correct for what I am looking at)

How can I find the exact value from the curve? I was hoping to be able to use something similar to the FindMinimum function, or draw a line along the asymptote and find the intersection with the x-axis.

This is the function used to plot the curve:

    Plot[((5/Log[2])*Log[(80046.8 - ((0.79) (101325 + (1030*9.81*d))))/((313545. + 2.17341d) - ((0.79) (101325 + (1030*9.81*d))))]), {d, 0, 60}, AxesLabel -> {Depth - m, Time - mins}]
  • $\begingroup$ This site is for questions about the software Mathematica. Did you mean to ask this here, or at math.SE? $\endgroup$ – J. M.'s torpor Apr 19 '13 at 13:52
  • $\begingroup$ Yes, the curve has been plotted on mathematica $\endgroup$ – emma Apr 19 '13 at 13:54
  • 2
    $\begingroup$ Surely you can see that your question is underspecified. How and what do you plot? Yes, an exponential curve; but what do you do? Plot[1+Exp[-x/5],{x,0,50}]? something else? Try to be specific. Pretend that you don't know what you are doing; would you understand your explanation? If not, neither will we... $\endgroup$ – acl Apr 19 '13 at 13:58
  • 4
    $\begingroup$ A hint: Apply Rationalize[] to your function first, and then feed this to Limit[]: Limit[(* your function *), d -> ∞] $\endgroup$ – J. M.'s torpor Apr 19 '13 at 14:18
  • 2
    $\begingroup$ Try Series[(* your function *), {d, ∞, 2}]. $\endgroup$ – Silvia Apr 19 '13 at 14:41

The vertical asymptote is caused by the denominator of the Log function going through zero. Therefore, find the value of $d$ such that your denominator is zero.

Solve[(313545. + 2.17341 d - 0.79 (101325 + 1030*9.81*d)) == 0, d

The result is 29.259612511.


Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.