       RE: Change Symbol in ListPlot

• To: mathgroup at smc.vnet.net
• Subject: [mg67551] RE: [mg67507] Change Symbol in ListPlot
• From: "Jaccard Florian" <Florian.Jaccard at he-arc.ch>
• Date: Fri, 30 Jun 2006 04:15:04 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Hello !

You have 2 possibilities.

First mistake : dist2= (not dist2-)
Second mistake : ...5] /@ cy}], Frame -> True]; (not /@ cy2) )

1) First possibility :

Show[Graphics[
{PlotSymbol[Star, 3] /@ cy}], Frame -> True, Axes -> True];

(You can use Star, Box, Diamond or Triangle)

Looking in <<Graphics`MultipleListPlot` , you will see other possibilities of creating your own symbol shapes.

2) Second possibility : (easier)

Just use MultipleListPlot. It's done for this...

MultipleListPlot[cy, SymbolShape -> PlotSymbol[Star, 4], SymbolStyle -> {Red}]

Regards

F.Jaccard

-----Message d'origine-----
De : Claus [mailto:Clausenator at gmail.com]
Envoyé : jeudi, 29. juin 2006 06:09
À : mathgroup at smc.vnet.net
Objet : [mg67507] Change Symbol in ListPlot

Hello,
I'm creating a List Plot in the following way. That is fine, "but" it
creates dots as the symbols. Is there a way to change the symbol (from a
dot to say a cross) in a ListPlot environment?
I got it to change in a Graphics environment, but then there are no
axes. Which environment is better for which occasions?
Thank you all for your help, I am really new to Mathematica!

Now the "code" with Listplot, that I can make to show plots only:
<<Statistics`StatisticsPlots`
<<Statistics`NormalDistribution`

dist=NormalDistribution[2,1.5];
SeedRandom;
x1=RandomArray[dist,100];

dist2-NormalDistribution[0,1];
SeedRandom;
y1=RandomArray[dist2,100];

z=0.8*x1+y1

cy=Transpose[{x1,z}];

ListPlot[cy, Frame -> True, FrameLabel -> {"t1", "z"},
PlotStyle -> {GrayLevel[0.1], AbsolutePointSize}];

\\If I use the Graphics package, I can use "PlotSymbol", but I don't
have axes:

Show[Graphics[
{PlotSymbol[Box, 5] /@ cy2}], Frame -> True];