MathGroup Archive 2002

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

Search the Archive

RE: Questions on Plot


Hi Steve,

> w = Table[Point[{Random[], Random[]}], {i, 1, 4096}];
> x = Table[Point[{Random[], Random[]}], {i, 1, 4096}];
> y = Table[Point[{Random[], Random[]}], {i, 1, 4096}];
> z = Table[Point[{Random[], Random[]}], {i, 1, 4096}];

> 2. In the latter case I also want to plot 4 types of points.
> How do I get ListPlot to put down 4 plots superimposed?
> Or can't I?

You can, but you have to do it via Graphics`MulitpleListPlot`.  

Load the requisite packages 
Needs["Graphics`Colors`"]
Needs["Graphics`MultipleListPlot`"]

Define 

cols = {Black, Red, Green, Blue}; 
pnts = {PlotSymbol[Triangle], PlotSymbol[Box], PlotSymbol[Diamond],
PlotSymbol[Star]};

Then

grf = MultipleListPlot[w, x, y, z,
	PlotStyle->cols,
	SymbolShape->pnts,
	SymbolsStyle->cols
	];

Documentation shows how to incorporate legends and to define other symbols.

Regards,

Dave.
==========================================
  Dr. David Annetts
  EM Modelling Analyst
  CSIRO DEM            Tel: +612 9490 5416
  North Ryde           Fax: +612 9490 5467
  Australia         David.Annetts at csiro.au
===========================================


  • Prev by Date: RE: pdf export
  • Next by Date: Re: how to plot with BOLD LINE with mathematica?
  • Previous by thread: RE: Questions on Plot
  • Next by thread: Re: Questions on Plot