Re: About plotting a surface
- To: mathgroup@smc.vnet.net
- Subject: [mg12605] Re: [mg12509] About plotting a surface
- From: "Jrgen Tischer" <jtischer@pitagoras.univalle.edu.co>
- Date: Mon, 25 May 1998 14:25:15 -0400
Hola Arthur Luiz,
first of all, the reason that the Mesh option wouldn't work is that
ParametricPlot3D doesn't return a SurfaceGraphics object but the more
general Graphics3D object. So the surface you are plotting is
represented by Polygons, each with its proper edges. I found no OPTION
to change the edges, but there is a graphics directive EdgeForm. The
one you need is EdgeForm[], to have no edges at all. I tried to add it
to the graphic produced by ParametricPlot3D with a Prolog->{EdgeForm[]}
option, it didn't work and I suspect there is a small bug (you can get
a strange result with Prolog->Hue[0]). So what was left was to first
generate the Graphics object
In[1]:= gr=ParametricPlot3D[{x,y,Sin[x y]},{x,0,1},{y,0,1}]
(*Graphic here*)
Out[1]= -Graphics3D-
(of course you can suppress the actual graphic output the usual way)
and then add in a Show the EdgeForm[] directive to the graphic.
In[2]:= Show[Graphics3D[{EdgeForm[],gr[[1]]}],gr[[2]]]
Sorry I could not find something more elegant.
Jrgen
-----Original Message-----
From: Arhur Luiz Amaral da Cunha <casmed@guarany.cpd.unb.br> To:
mathgroup@smc.vnet.net
Subject: [mg12605] [mg12509] About plotting a surface
>I would like to know how to take the mesh off a parametric surface using
>the command ParametricPlot3D. I tried to use the "Mesh->False" option
>but it did not work within ParametricPlot3D despite it did work within
>Plot3D. I would appriciate it wether you could give me an advice. I
>look forward to your reply.
>
> Best Regards
>
> Arthur Luiz A. Cunha
>