I'd like to use ComplexListPlot
to show a point and its image under a complex function, with the point and image having different styles, say different colors.
Use, for example:
z1 = 3 + 4 I;
f[z_] := Sin[20/z]
The following will do what I want:
pt = ComplexListPlot[{z1}, PlotRange -> {-1 - 2 I, 10 + 10 I},
PlotStyle -> {PointSize[Large], Red}];
val = ComplexListPlot[{f[z1]}, PlotRange -> {-1 - 2 I, 10 + 10 I},
PlotStyle -> {PointSize[Large], Green}];
Show[{pt, val}, ImageSize -> Small]
But is there a simpler way, using a single ComplexListPlot
expression?
I tried the following, but it just applies the first entry (with Red
) to both points:
ComplexListPlot[{z1, f[z1]}, PlotRange -> {-1 - 2 I, 10 + 10 I},
PlotStyle -> {{PointSize[Large], Red}, {PointSize[Large], Green}},
ImageSize -> Small]
I may be "pushing" ComplexListPlot
to do something for which it was not really intended, but as things stand I see no other way to plot points in the complex plane in different styles while still using complex numbers and not (real,imag) pairs of reals.
Before version 12's ComplexListPlot
, I would create the image with David Park's Presentations add-on application as follows:
Draw2D[{PointSize[Large], Red, ComplexPoint[z1], Green,
ComplexPoint[f[z1]]}]