Re: Contours plot
- To: mathgroup at smc.vnet.net
- Subject: [mg78829] Re: Contours plot
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Wed, 11 Jul 2007 05:58:09 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <f6vn85$qcr$1@smc.vnet.net>
Tomas Bayer wrote:
> I have some problem with Mathematica 6. How do I plot contours for this parametric equation:
>
> x=Sin[la]/Cos[fi]]
> y=Tan[fi]*Cos[la]
> z=Sqrt[Sec[fi]^4 - Sec[fi]^2 Sin[la]^2]
>
> fi=<-Pi/2,Pi/2>, la=<-Pi,Pi>
>
> Thanks
Does
ParametricPlot3D[{Sin[la]/Cos[fi], Tan[fi]*Cos[la],
Sqrt[Sec[fi]^4 - Sec[fi]^2*Sin[la]^2]}, {fi, -Pi/2, Pi/2},
{la, -Pi, Pi}]
fit your needs?
Regards,
Jean-Marc