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

MathGroup Archive 2007

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

Search the Archive

Re: graphing curves in the complex plane

  • To: mathgroup at smc.vnet.net
  • Subject: [mg75844] Re: graphing curves in the complex plane
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Fri, 11 May 2007 06:30:14 -0400 (EDT)
  • Organization: Uni Leipzig
  • References: <f21dvn$6c5$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de

Hi,

Assuming[Element[{x, y}, Reals],
   With[{z = x + I*y},
     eqn = FullSimplify /@ (Abs[z *Exp[1 - z]] == 1)
     ]
   ]
ContourPlot[Evaluate[Subtract @@ eqn],
   {x, -1, 1}, {y, -1, 1}, Contours -> {0}
   ]

??

Regards
   Jens

Stephanie S CavagnaroWong wrote:
> Hi,
> 
> I am trying to graph Szego's curve, S = {z in C: |ze^(1-z)| = 1, |z| <=
> 1} in the complex plane, and I cannot figure out how to do this.  I have
> tried many variations of the various Plot functions with no success.
> Any advice would be appreciated!
> 
> I am relatively new to Mathematica, so I apologize if this is a simple
> question -- I have done much websearching, including in the MathGroup
> archives, and could not find an answer.
> 
> Thank you very much,
> Stephanie Wong.
> 


  • Prev by Date: Re: Mathematica 6 & Wolfram Workbench
  • Next by Date: Re: Package Help in Mathematica 6
  • Previous by thread: Re: graphing curves in the complex plane
  • Next by thread: Re: graphing curves in the complex plane