Dismiss Notice
Join Physics Forums Today!
The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

Numerically Solve

  1. Oct 12, 2009 #1
    I need to solve this implicit function of the catenary


    how do i Do this in mathematica?
  2. jcsd
  3. Oct 12, 2009 #2


    User Avatar
    Homework Helper

    FindRoot[k==Cosh[k/Sqrt[k^2-1]], {k,guess}]
    Where guess is a guess of the answer.
  4. Oct 13, 2009 #3


    User Avatar
    Gold Member

    If you do a :
    Plot[{k, Cosh[k/Sqrt[(k^2 - 1)]]}, {k, 0, 4}]

    You can get an approximate guess to use lurflurf's suggestion, for the two roots.
    FindRoot[Cosh[k/Sqrt[k^2 - 1]] - k, {k, 0.6}]
    FindRoot[Cosh[k/Sqrt[k^2 - 1]] - k, {k, 2}]
Know someone interested in this topic? Share this thread via Reddit, Google+, Twitter, or Facebook