[mg88288] Re: Complex Plot

[Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>]

Chris Degnen wrote:

> Can anyone tell me how I can re-express this
> equation in terms of x for plotting?
> 
> Sin[x^2*y]==Log[x/y]
> 
> last sighted: http://tinyurl.com/3s4hfd 

Hi Chris,

If you are interested in the graphical representation of this function, 
you may want to use *ContourPlot* and experiment with its various 
options. For instance,

ContourPlot[Sin[x^2*y] - Log[x/y], {x, -12, 35}, {y, -8, 23},
  ImageSize -> 500]

ContourPlot[Sin[x^2*y] - Log[x/y], {x, -12, 35}, {y, -8, 23},
  ImageSize -> 500, ColorFunction -> (White &), ContourStyle -> Black,
  MaxRecursion -> 0, PlotPoints -> 500]

You can see the result at

http://homepages.nyu.edu/~jmg336/mathematica/chrisdegnencomplexplot.pdf

Note that the second plot may take several minutes to complete due to 
the huge number of sampling points, but it should be very close to what 
you have seen on the Internet.

Hope this helps,
-- Jean-Marc