       Re: ContourPlot3D: plot implicitly defined surfaces

• To: mathgroup at smc.vnet.net
• Subject: [mg35286] Re: ContourPlot3D: plot implicitly defined surfaces
• From: "Raf" <r_a_f at yahoo.it>
• Date: Sat, 6 Jul 2002 05:44:41 -0400 (EDT)
• References: <ag3esq\$73n\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```In general, to each value of the couple {a,b} the system { F(x,y;a,b)=0,
G(x,y;a,b)=0 } can associate many couple of {x,y} as you can see with this
example:

f := x*a* y*Sin[y] + b*y*Cos[x + b] + 1.;
g := 3b x Sin[x] + y*a *Cos[y + a] + 1.;

<< Graphics`ImplicitPlot`

ImplicitPlot[{f == 0., g == 0.} /. {a -> 1, b -> 1}, {x, -2 Pi,
2 Pi}, {y, -2 Pi, 2 Pi}, PlotPoints -> 50,
PlotStyle -> {GrayLevel, Hue}]

Now, if i understand what you mean, you want to plot the cartesian surface
x=x(a,b) that, in the general case, is not well defined by this system.
If you are sure that there is only a solution for each couples of {a,b}, you
can try to find the numerical solution for each couples of {a,b} (using for
example something like Table[{a, b, x} /.       FindRoot[{f == 0, g == 0},
{x, x0}, {y, y0}]], {a, a0, a1, as}, {b, b0, b1, bs}] ), and then plot the
result
with ListSurfacePlot3D, or if there are problems with this command, only
take a look to the result using Point on the solutions:
Show[Graphics3D[Point /@ Flatten[sol, 1]]

Bye,
Raf.

"Jun Lin" <jl_03824 at yahoo.com> ha scritto nel messaggio
news:ag3esq\$73n\$1 at smc.vnet.net...
> Given two functions F=F(x,y;a,b) and G=G(x,y;a,b), the relations
>
>  F(x,y;a,b)=0, and
> {
>  G(x,y;a,b)=0
>
> implicitly define another two functions x=x(a,b) and y=y(a,b). Suppose
> functions F and G are implicit and transcendental, it is cumbersome to
> get x and y simultaniously from F=0 and G=0. Is it possible to plot
> surfaces x=x(a,b) and y=y(a,b) according to F=0 and G=0 by means of
> ContourPlot3D?
> Any suggestion and advice will be appreciated.
>
> Jun Lin
>

```

• Prev by Date: Re: Re: Art Graphics in Mathematica
• Next by Date: RE: dynamic optimization
• Previous by thread: ContourPlot3D: plot implicitly defined surfaces
• Next by thread: How to suppress the mesh in ParametricPlot3D ?