MathGroup Archive 2004

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

Search the Archive

Re: color and pointsize in listplot

  • To: mathgroup at
  • Subject: [mg48410] Re: color and pointsize in listplot
  • From: "Peter Pein" <petsie at>
  • Date: Fri, 28 May 2004 00:50:47 -0400 (EDT)
  • References: <c8vasm$3vn$>
  • Sender: owner-wri-mathgroup at

"Maurits Haverkort" <Haverkort at> schrieb im Newsbeitrag
news:c8vasm$3vn$1 at
> Dear all
> I have a list consisting of {x,y,RGBColor,Pointsize} that I would like to
> plot. I.e. each point will have a different size and color. How can I do
> this in Mathemaitca.
> Best Regards,
> Maurits

Since "The styles are used cyclically" [help on disk] is not true (at least
for version 4.0),

data = Table[{Random[], Random[], RGBColor[Random[], Random[], Random[]],
     10^Random[Real, {-1.5, -0.9}]}, {10}];

lp = ListPlot[Take[#1, 2] & /@ data, DisplayFunction -> (#1 & )];

Show[lp, (Graphics[{#1[[3]], PointSize[#1[[4]]], Point[Take[#1, 2]]}] & ) /@
  data, DisplayFunction -> $DisplayFunction]

has to do the job.


P.S.: I send this, because it shows you how to combine the suitable axes
with the colourful graphics
Peter Pein, Berlin
to write to me, start the subject with [

  • Prev by Date: stepwise ode. why does this fail?
  • Next by Date: Mathematica courses in Amsterdam
  • Previous by thread: RE: color and pointsize in listplot
  • Next by thread: MultipleListPlot,Plot and combining legends