Re: Implicit plotting issues
- To: mathgroup at smc.vnet.net
- Subject: [mg82222] Re: Implicit plotting issues
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Mon, 15 Oct 2007 01:26:40 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <fesqkr$pcn$1@smc.vnet.net>
nateomason at gmail.com wrote: > So I am plotting an implicit function the that has small y values(0 > to .5) and large x values(0 to 74). > the graph i get is not readable and i can 't resize it using the edges > it is lame. > So does anyone know how to rescale the the implicit plot so that i > could read it. I have included my code, below. I am using Mathematica > 5.2 <snip> Use ContourPlot rather than ImplicitPlot. << "Graphics`ImplicitPlot`" u0 = 76; \[Omega] = Pi/12; uh = u0/E^(k*t); up = 7*(5 - 5/E^(k*t) - (1/(k^2 + \[Omega]^2))* ((2*k*((-k)*Cos[3*\[Omega]] + \[Omega]*Sin[3*\[Omega]] + E^(k*t)*(k*Cos[(-3 + t)*\[Omega]] + \[Omega]*Sin[(-3 + t)*\[Omega]])))/E^(k*t))); myANS = uh + up; U = myANS; ContourPlot[U - 30, {t, 0, 72}, {k, 0.2, 0.48}] Plot3D[U, {t, 0, 72}, {k, 0.2, 0.48}] Regards, -- Jean-Marc