Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

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.

(Please note two mistakes in your code :
First mistake : dist2= (not dist2-)
Second mistake : ...5] /@ cy}], Frame -> True]; (not /@ cy2) )

1) First possibility : 

Using your idea, just add Axes->True !

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[1];
x1=RandomArray[dist,100];

dist2-NormalDistribution[0,1];
SeedRandom[2];
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[10]}];

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

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




Thanks for your help!
Claus


  • Prev by Date: Options to FunctionInterpolation
  • Next by Date: Recognizing newline character in regular expressions
  • Previous by thread: RE: Change Symbol in ListPlot
  • Next by thread: Re: Change Symbol in ListPlot