Plotting an implicit function
- To: mathgroup at smc.vnet.net
- Subject: [mg50559] Plotting an implicit function
- From: david.friskin at upe.ac.za (David Friskin)
- Date: Fri, 10 Sep 2004 04:05:59 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
I have the following implicit function: f[r, M]=1 + (-1 - 0.03*M^2 + 1.2*M)*r - (0.05*E^(r*M)/r - 0.05/r + E^(r*M)*(1 - 0.05*M))==0 where r is a function of M i.e. r(M). I would like to plot r(M) vs M, for {M,0,20}. I tried using ImplicitPlot[{f[r,M] == 0},{M,0,20}], but Solve is having problems finding the roots to my function. Could someone help me with the code to do this, perhaps using FindRoot somehow? Thanks David P.S. r > 0