Re: Adding identification marks to a Plot
- To: mathgroup at christensen.cybernetics.net
- Subject: [mg860] Re: [mg791] Adding identification marks to a Plot
- From: "Tone Dieckmann" <TONE at pool.uni-mannheim.de>
- Date: Wed, 26 Apr 1995 00:27:30 -0400
Joseph McWilliams wrote
> The program below will plot f[n,x] for k values of the parameter n
> for x
> in the interval [a,b], all on the same axis. Is there any way to place
> markers next to each plotted function so they can be distinguished from
> one another? Color is out, this is for a grey scale NeXT station.
>
> Show[Table[Plot[f[n,x],{x,a,b}, DisplayFunction->Identity], {n,1,k}],
> DisplayFunction -> $DisplayFunction]
>
>
>
> Joseph McWilliams Wagner's music is better than it sounds.
> Nacogdoches, TX -- Mark Twain --
> mcwilljg at euler.sfasu.edu
>
>
You can try either `Thickness' or `Dashing' for this purpose. For
instance,
Show[Table[Plot[f[n,x],{x,a,b},
PlotStyle -> {Dashing[{N[2 n/100], 0.03}]},
DisplayFunction->Identity], {n,1,k}],
DisplayFunction -> $DisplayFunction]
will display each graph with differently a dashed line.
Hope this helps.
Tone