Advanced Search

Question: pointplot question on adding colour

Question:pointplot question on adding colour

Ronan 1207 Maple 2016
plot color pointplot
April 22 2017
0

I am plotting a pair of lists of points using

pointplot(Listap, Listbp, symbol = point, symbolsize = 1, size = [1200, 1200])

 

How could is do this with plot so I can add colours? Along the lines Listap(i)^2+Listbp(i)^2 =R, R is in the range 0..1,then colour =R*256 or any other imaginative way of adding colour.
 

restart

with(plots):

with(plottools):

``

``

NULL

``

z := (m+I*n)/(p+I*q)

(m+I*n)/(p+I*q)

 (1)

g := proc (z) options operator, arrow; (z-I)/(z+I) end proc;

proc (z) options operator, arrow; (z-I)/(z+I) end proc

 (2)

bz := simplify(evalc(Im(z)));

(-m*q+n*p)/(p^2+q^2)

 (3)

a := simplify(evalc(Re(g(z))));

(m^2+n^2-p^2-q^2)/(m^2-2*m*q+n^2+2*n*p+p^2+q^2)

 (4)

b := simplify(evalc(Im(g(z))));

(-2*m*p-2*n*q)/(m^2-2*m*q+n^2+2*n*p+p^2+q^2)

 (5)

``
" r:=15; Lista:=Vector(); Listb:=Vector(); j:=1; for m from -r to r do for n from -r to r do for p from -r to r do for q from -r to r do if p<>0 and q<>0 and m^2-2 m q+n^2+2 n p+p^2+q^2<>0 and bz>=0 then Lista(j):=a; Listb(j):=b; j:=j+1; end if; end do: end do; end do; end do: j; :"

435713

 (6)

``

``

``

``

``

pointplot(Lista, Listb, symbol = plottools:-point, symbolsize = 1, size = [1200, 1200])

  

NULL

``

``


 

Download 096-Chayley_transform_for_MP_question.mw
Please Wait...