Re: Plotting just specific points
- To: mathgroup at smc.vnet.net
- Subject: [mg54110] Re: [mg54043] Plotting just specific points
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Thu, 10 Feb 2005 02:48:16 -0500 (EST)
- Reply-to: hanlonr at cox.net
- Sender: owner-wri-mathgroup at wolfram.com
Needs["Graphics`"];
a={5,1,2,2,6,7,2,2,8,2};
pts=Thread[{Range[Length[a]],a}];
ListPlot[a,Epilog->
{AbsolutePointSize[4],
{If[#[[2]]==2,Red,Blue],
Point[#]}&/@pts}];
Show[Graphics[{AbsolutePointSize[4],
{If[#[[2]]==2,Red,Blue],Point[#]}&/@
pts}],Axes->True];
Bob Hanlon
>
> From: zak <chocolatez at gmail.com>
To: mathgroup at smc.vnet.net
> Date: 2005/02/09 Wed AM 09:27:15 EST
> To: mathgroup at smc.vnet.net
> Subject: [mg54110] [mg54043] Plotting just specific points
>
> if i have the list:
> a={5,1,2,2,6,7,2,2,8,2}
> and in the ListPlot[a] i want to show only the points wich represent
> only the "2" while preserving the positions of the "2" in the list, so
> i could focus my attention to a specific wanted values, how could i do
> that
> or even better if it is possible to plot the whole values of
> ListPlot[a] while making the points "2" in red color as an example.
> thanks
> zak
>
>