Re: Getting Color *names* as strings?
- To: mathgroup at smc.vnet.net
- Subject: [mg67488] Re: [mg67473] Getting Color *names* as strings?
- From: ggroup at sarj.ca
- Date: Wed, 28 Jun 2006 03:51:41 -0400 (EDT)
- References: <200606270714.DAA06647@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
How are you defining greens? If you typed them out, couldn't you just make
that a list of strings and then change PlotStyle to something like:
PlotStyle->ToExpression[greens[[k]]]
Good luck!
On Tue, 27 Jun 2006 03:14:46 -0400 (EDT), AES wrote
> Trying out different named Colors in a plot by using
>
> greens={CinnabarGreen, ChromeOxideGreen, CobaltGreen, etc};
>
> Do[ Plot[ func, range, PlotStyle -> greens[[k]],
> PlotLabel -> ToString[greens[[k]]] ] ,
> {k, 1, Length[greens]} ];
>
> Works fine -- except the PlotLabel comes out as "RGB[num, num, num]" --
> and using SymbolName[greens[[1]]] or even SymbolName[CinnabarGreen]
> does _not_ give the string "CinnabarGreen".
>
> How can I get the *name* of each color as a string to put in PlotLabel
> or in a Text label?
>
> (Trivial problem, I agree, but just frustrating enough to be
> interesting)
- References:
- Getting Color *names* as strings?
- From: AES <siegman@stanford.edu>
- Getting Color *names* as strings?