Re: Re: Colors in ScatterPlot3D?
- To: mathgroup at smc.vnet.net
- Subject: [mg51239] Re: [mg51202] Re: Colors in ScatterPlot3D?
- From: DrBob <drbob at bigfoot.com>
- Date: Sat, 9 Oct 2004 04:19:17 -0400 (EDT)
- References: <200409300852.EAA26534@smc.vnet.net> <cjj7mg$bq1$1@smc.vnet.net> <200410080654.CAA24970@smc.vnet.net>
- Reply-to: drbob at bigfoot.com
- Sender: owner-wri-mathgroup at wolfram.com
That doesn't happen with my Mathematica 5.0.1 WinXP installation, but apparently it does on your machine. Go figure.
I'd try wrapping Evaluate around Transpose, or around the List that's a part of, since the error message indicates "red" isn't evaluated soon enough.
Another possibility is that "red" didn't get defined because of a spelling error (though you didn't mention any), since Red is a symbol in Graphics`Colors`. I include
Off[General::"spell"]
Off[General::"spell1"]
in my Init.m, so that never happens to me.
Bobby
On Fri, 8 Oct 2004 02:54:51 -0400 (EDT), Klaus G <Karl_boehme_9 at msn.com> wrote:
> DrBob <drbob at bigfoot.com> wrote in message news:<cjj7mg$bq1$1 at smc.vnet.net>...
>> The option should be:
>>
>> PlotStyle -> (RGBColor[#, 0, 0] & /@ colortable)
>>
>> But that still gives the first color for all the points.
>>
>> This works, however:
>>
>> atable = Table[Random[Integer, {1, 10}], {50}, {3}];
>> colortable = Table[Random[Real, {0, 1}], {50}];
>> red = RGBColor[#, 0, 0] &
>> Show[Graphics3D at {PointSize[.02], Transpose@{red /@
>> colortable, Point /@ atable}}]
>>
>> Bobby
>>
>
> This results in the following error message along with a System crash:
>
> "Graphics3D::gprim: red[0.868505] was encountered where a Graphics3D
> primitive or directive was expected...."
>
> Klaus G.
>
>
>
>
--
DrBob at bigfoot.com
www.eclecticdreams.net
- References:
- Re: Colors in ScatterPlot3D?
- From: Karl_boehme_9@msn.com (Klaus G)
- Re: Colors in ScatterPlot3D?