MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Re: Colors in ScatterPlot3D?


>> ScatterPlot3D[atable, PlotStyle -> {RGBColor[#, 0, 0]}& /@ colortable]
>> should give you different shades of red.

But it doesn't.

Run this a few times, and you'll see:

atable = Table[Random[Integer, {1, 10}], {50}, {3}];
colortable = Table[Random[Real, {0, 1}], {50}];
ScatterPlot3D[atable, PlotStyle -> ({PointSize[.05Random[]], RGBColor[#, 0,
           0]} & /@ colortable)]

All the points are the same size and color.

Bobby

On Fri, 1 Oct 2004 04:50:10 -0400 (EDT), Peter Pein <petsie at arcor.de> wrote:

> "Klaus G" <Karl_boehme_9 at msn.com> schrieb im Newsbeitrag
> news:cjgih6$q5a$1 at smc.vnet.net...
>> To give colors to each point individually the following has been
>> proposed recently:
>>
>> << Graphics`Graphics3D`
>>
>> atable = Table[Random[Integer, {1, 10}], {50}, {3}];
>> colortable = Table[Random[Real, {0, 1}], {50}]
>> ScatterPlot3D[atable, PlotStyle -> RGBColor[#, 0, 0]&/@ colortable]
>>
>> But all colors are the same. It looks like only the first color value
>> in colortable is used.
>>
>> Thanks.
>>
>> Klaus G.
>>
>
> ScatterPlot3D[atable, PlotStyle -> {RGBColor[#, 0, 0]}& /@ colortable]
> should give you different shades of red.



-- 
DrBob at bigfoot.com
www.eclecticdreams.net


  • Prev by Date: Re: Forcing functions
  • Next by Date: Problem with Maximize and conditions.
  • Previous by thread: Re: Colors in ScatterPlot3D?
  • Next by thread: Re: Colors in ScatterPlot3D?