MathGroup Archive 1999

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: EdgeForm in ParametricPlot3D

  • To: mathgroup at smc.vnet.net
  • Subject: [mg16234] Re: EdgeForm in ParametricPlot3D
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Fri, 5 Mar 1999 00:40:59 -0500
  • Organization: Universitaet Leipzig
  • References: <7bg2ph$5o8@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Hi Mark,


sp = ParametricPlot3D[{Sin[t] Sin[p], Sin[t] Cos[p],
Cos[t],EdgeForm[]},{t, 0, Pi},
 {p, 0, 2Pi}, PlotPoints->25];

will do what You want.

Regards
  Jens


"William B. Marks" wrote:
> 
> How to make a sphere without meshlines? My way is inelegant:
> 
> sp = ParametricPlot3D[{Sin[t] Sin[p], Sin[t] Cos[p], Cos[t]},{t, 0, Pi},
> {p, 0, 2Pi}, PlotPoints->25];
> 
> Show @ Graphics3D[{EdgeForm[], Apply[List, sp]}];
> 
> It works but gives errors.
> 
> Any suggestions?


  • Prev by Date: Re: I have problem with these functions!!
  • Next by Date: Re: How to draw the level curves ?
  • Previous by thread: Re: EdgeForm in ParametricPlot3D
  • Next by thread: Re: EdgeForm in ParametricPlot3D