Re: A question about a sphere
- To: mathgroup at smc.vnet.net
- Subject: [mg107122] Re: A question about a sphere
- From: Peter Pein <petsie at dordos.net>
- Date: Wed, 3 Feb 2010 06:11:07 -0500 (EST)
- References: <hk6cu2$m1a$1@smc.vnet.net>
Am 01.02.2010 12:12, schrieb Marwa Abd El-Wahaab:
> Dear Sir,
>
> I am a Mathematica 7 user.
>
> I have a question :
>
> I want to draw a sphere, then draw 5 circles on this sphere like
> *latitudes*and draw 5 lines on this sphere like
> *longitudes*.
>
> I need your help.
>
> Thanks in advance
>
> Marwa Ali
>
>
Hi,
IMHO
ParametricPlot3D[
{Cos[phi] Sin[th],Cos[phi] Cos[th],Sin[phi]},
{phi,-Pi,Pi},{th,-Pi,Pi},
PlotPoints->{33,33},Mesh->{9,9},Boxed->False,Axes->None]
is the easiest way to do this task. Choose the values for PlotPoints to
your needs (to get a sufficiently smooth surface).
Usually the range [-Pi/2,Pi/2] for phi is sufficient to draw a sphere,
but then - of course - a mesh-line is missing.
Peter