Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Re: ListPlot ColorFunction

  • To: mathgroup at smc.vnet.net
  • Subject: [mg99136] Re: [mg99119] ListPlot ColorFunction
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Tue, 28 Apr 2009 04:44:48 -0400 (EDT)
  • Reply-to: hanlonr at cox.net

>From the documentation for ListPlot | Options | ColorFunction: 

"ColorFunction requires at least one dataset to be Joined"

data = {9, 4, 1, 0, 0, 0, 1, 4, 9};

data2 = Transpose[{Range[Length[data]], data}];

ListPlot[List /@ data2,
 Filling -> Axis,
 PlotStyle -> ({PointSize[0.02],
      If[#[[2]] == 0, Red, Blue]} & /@
    data2)]


Bob Hanlon

---- Serych Jakub <Serych at panska.cz> wrote: 

=============
Dear Mathematica users,
first let me thank you for many nice zigzag solutions from my previous post.

Today I have another question. I need to highlight some data points in
ListPlot by changing their color. How to do it? I tried the similar solution
which somebody have sent me time ago for the same problem which I had with
Plot, but it doesn't work with ListPlot.

In the example below I'm trying to make the zero points Red and all other
Blue.

ListPlot[{9, 4, 1, 0, 0, 0, 1, 4, 9}, Filling -> Axis,
 PlotStyle -> PointSize[0.02],
 ColorFunction -> (If[# == 0, RGBColor[1, 0, 0], RGBColor[0, 0, 1]] &)]


Thanks in advance for any help

Jakub



  • Prev by Date: Re: ListPlot ColorFunction
  • Next by Date: Re: Mathematica crashed -- where did my notebook go?
  • Previous by thread: Re: ListPlot ColorFunction
  • Next by thread: Re: ListPlot ColorFunction