Point Size and Plot Symbols
- To: mathgroup at smc.vnet.net
- Subject: [mg30480] Point Size and Plot Symbols
- From: "David Park" <djmp at earthlink.net>
- Date: Thu, 23 Aug 2001 02:15:45 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
I changed the Subject heading to reflect the topic.
Here is a sample set of points.
pts = Table[{x, Sin[x]}, {x, 0, Pi, Pi/16}];
You can adjust the point size by using the Prolog option in ListPlot.
ListPlot[pts, Prolog -> AbsolutePointSize[4]];
You can also plot your points this way, without using ListPlot.
Show[Graphics[{AbsolutePointSize[4], Point /@ pts}],
Frame -> True];
You can plot the points with whatever symbol you wish by using routines from
the MultipleListPlot package. The following plots the points as stars.
Needs["Graphics`MultipleListPlot`"]
Needs["Graphics`Colors`"]
Show[Graphics[
{PlotSymbol[Star, 5] /@ pts}], Frame -> True];
You can even make up your own symbols using the MakeSymbol command. This
makes a black cross with a Blue dot in the center.
Show[Graphics[{MakeSymbol[{Blue, AbsolutePointSize[6], Point[{0, 0}], Black,
Line[{{1, 1}, {-1, -1}}*6], Line[{{-1, 1}, {1, -1}}*6]}] /@ pts}],
Frame -> True, ImageSize -> 500];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
> From: Au Han Bin [mailto:auhb3 at cz3.nus.edu.sg]
To: mathgroup at smc.vnet.net
>
>
> i'd like to ask if i can make the dots for ListPlot bigger, or preferably
> change it to other symbols or shapes?
> desperately needing help
>
> regards, joshua_au at hotmail.com
>