MathGroup Archive 2009

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

Search the Archive

Re: Draw a circle in 3D

  • To: mathgroup at smc.vnet.net
  • Subject: [mg99624] Re: [mg99593] Draw a circle in 3D
  • From: Adriano Pascoletti <adriano.pascoletti at dimi.uniud.it>
  • Date: Sat, 9 May 2009 03:23:30 -0400 (EDT)
  • References: <200905080420.AAA16705@smc.vnet.net>

Try

=E8 = 25*Degree;

Graphics3D[{Cylinder[{{0, 0, 0}, {0, 0, 0.001}}, 1],
      Cylinder[{{0, 0, 0}, 0.001*{Cos[=E8], Sin[=E8], 0}}, 1]}]


Adriano Pascoletti

2009/5/8 ibmichuco at hotmail.com <ibmichuco at hotmail.com>

> Hi,
>
> I would like to draw circles of radius 1 centered at the origin in 3d,
> similar to (but not limited to) the longitude lines of the globe. That
> is planes that lies in the a particular plane made an angle  with the
> one of the axes etc.
>
> Is there any mathematica function to do this?
>
> Many thanks in advance,
>
> Michuco
>
>



  • Prev by Date: Re: can we save indexed colored images in v7?
  • Next by Date: Re: Draw a circle in 3D
  • Previous by thread: Draw a circle in 3D
  • Next by thread: Re: Draw a circle in 3D