Re: Symbols using Prolog
- To: mathgroup at smc.vnet.net
- Subject: [mg33695] Re: Symbols using Prolog
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Tue, 9 Apr 2002 01:01:56 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <a8m2rl$oa4$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
you can't replace the Point[] primitive in ListPlot[]
by the prolog option. You can hook Point[] with
Block[{Point},
Point[a_] := Text["\[EmptyCircle]", a];
ListPlot[data]
]
or replace it later
gr = ListPlot[data, DisplayFunction -> Identity] /.
Point[a_] :> Text["\[EmptyCircle]", a];
Show[gr, DisplayFunction -> $DisplayFunction]
You can use the Prolog in Plot[]
Plot[Sin[x],{x,0,2Pi},Prolog->{Text["\[EmptyCircle]", #] & /data}]
Regards
Jens
David Robinson wrote:
>
> Excuse a question from a beginner.
>
> There has been some discussion about using graphics primatives to show
> symbols on plots. However, it wasn't clear from the discussion how to
> change the symbol using the Prolog option within, for example ListPlot.
>
> ListPlot[list , PlotRange->{0.,1.0} , AxesOrigin->{0,0.0} ,
> Prolog->{.....?....}]
>
> Any one have any insights out there?
>
> Dave Robinson
>
> --
>
> -------------------------------------------------------------------------------
>
> Prediction is very difficult, especially about the future.
> -- Neils Bohr