Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2003
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2003

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

Search the Archive

Re: Ellipse Drawing

  • To: mathgroup at smc.vnet.net
  • Subject: [mg40189] Re: Ellipse Drawing
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Tue, 25 Mar 2003 14:47:38 -0500 (EST)
  • Organization: Universitaet Leipzig
  • References: <b5p0df$7r4$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

something like:

ellipse[a_, b_, phi_, point_] := Module[{th},
    Line[Append[#, 0] + point & /@ ({{Cos[phi], Sin[phi]},
                  {-Sin[phi], Cos[phi]}}.# & /@ 
            Table[{a*Cos[th], b*Sin[th]}, {th, 0, 2Pi, 2Pi/36}])]
    ]

Show[Graphics3D[
    Table[ellipse[2, 1, th, {0, 0, th}], {th, 0, Pi, Pi/8}]]]


Regards
  Jens

caroline nyhan wrote:
> 
> Hi,
> 
> I have a question concerning using mathematica to draw
> the cross-sectional pattern of the polarisation
> ellipse.
> 
> I want to know how I would draw an ellipse, in the XY
> plane, with propagation in the positive z-direction,
> by specifying its
> - azimuth (angle that the major axis of the
> cross-sectional ellipse makes with the horizontal
> x-axis (positive when counterclockwise from x-axis))
> - ellipticity (measure of the fatness of the ellipse,
> (ratio of the lengh of the semi-minor axis to that of
> the semi-major axis))
> 
> Thanks
> Caroline
> 
> __________________________________________________
> Do you Yahoo!?
> Yahoo! Platinum - Watch CBS' NCAA March Madness, live on your desktop!
> http://platinum.yahoo.com


  • Prev by Date: Re: proper way to manipulate lists?
  • Next by Date: RE: proper way to manipulate lists?
  • Previous by thread: Ellipse Drawing
  • Next by thread: RE: Ellipse Drawing