Mathematica, ComplexListPlot: как сделать "соединенные" линии и точки на графике разными цветами? - PullRequest
0 голосов
/ 28 мая 2020

1) Построенные точки и «соединенные» линии всегда одного цвета. Могу я сделать их разными? 2) Иногда числовые метки не отображаются, как в случае с самой нижней точкой, расположенной на оси X. М. ловко размещает метку относительно точки, так почему бы не с этой точкой? Вот код, за которым следует построенный им график.

tow[0] = 1
tow[n_] := seed^tow[n-1]
seed =  I
ComplexListPlot[Table[Labeled[N[tow[i]], i], {i, 1, 30}], 
PlotRange -> All, Joined -> True, PlotStyle -> Red, 
PlotMarkers -> {Automatic, Smaller}]

1 Ответ

0 голосов
/ 28 мая 2020

Попробуйте

Show[
  ComplexListPlot[Table[N[tow[i]],{i,1,30}],
    PlotRange->All,PlotStyle->{Green,PointSize[.03]}],
  ComplexListPlot[Table[Labeled[N[tow[i]],i],{i,1,30}],
    PlotRange->All,Joined->True,PlotStyle->Red]
]
...