Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum > General > > "Defining a different color for each point"

Post Reply:
Name:
Email Address:

Please send email when my message is replied to.

Url (optional):
Subject:
Message: view original message?
Attachment (optional):
Please answer this:1+6 =



Original Message (ID '93970') By Bill Simpson:
In Response To 'Re: Re: Defining a different color for each point' --------- You wrote "I have a set of coordinates (x,y,z) that I want to plot..." If you have polar data {radius,angle,color} data instead of {x,y,color} data then perhaps you can see how to use this In[1]:= polarData = Table[{j, j, j/(2Pi)}, {j, 0, 2Pi, Pi/8}]; polarToRectangular[{radius_, angle_, color_}] := {radius*Cos[angle], radius*Sin[angle], color}; rectangularData = Map[polarToRectangular, polarData]; Show[PolarPlot[0, {angle, 0, Pi}], Graphics[{PointSize[.05], Map[{Hue[Last[#]], Point[Most[#]]} &, rectangularData]}], PlotRange -> All] Out[4]=