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. >