Re: How to plot individual 2D data points, where each must have its own color.
- To: mathgroup at smc.vnet.net
- Subject: [mg58988] Re: [mg58957] How to plot individual 2D data points, where each must have its own color.
- From: "David Park" <djmp at earthlink.net>
- Date: Tue, 26 Jul 2005 04:01:53 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Chrisantha, It always helps if a poster can supply some actual sample data. Then a responder doesn't have to make up data that may not reflect your actual form of data. In any case, here is some sample data where the third item is a Hue color. data = Table[{x, Sin[x], Hue[x/(2Pi)]}, {x, 0.0, 2Pi, 2Pi/20}] Show[Graphics[ {AbsolutePointSize[6], {Part[#, 3], Point[Take[#, 2]]} & /@ data}], Frame -> True, ImageSize -> 450]; What I did was use a pure function, {Part[#, 3], Point[Take[#, 2]]} &, that extracted the third part of the data list to specify the color first, and then applied a Point to the first two parts. This was Mapped onto the data points. David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: Chrisantha [mailto:ctf20 at sussex.ac.uk] To: mathgroup at smc.vnet.net Dear All, I have a list of data A = {{x,y,z}, {x2,y2,z2}.....{xn,yn,zn}} where x, and y are coordinates of points, and z is the color of that point. How can I plot this on a 2D plot? Yours Ever, Chrisantha Fernando. www.chrisantha.com Dept. of Biology. University of Sussex.