Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Re: FilledPlot: Curves->Back option and Epilog not working?

• To: mathgroup at smc.vnet.net
• Subject: [mg56914] Re: [mg56884] Re: [mg56861] FilledPlot: Curves->Back option and Epilog not working?
• From: Chris Chiasson <chris.chiasson at gmail.com>
• Date: Tue, 10 May 2005 03:42:15 -0400 (EDT)
• References: <200505090546.BAA13819@smc.vnet.net>
• Reply-to: Chris Chiasson <chris.chiasson at gmail.com>
• Sender: owner-wri-mathgroup at wolfram.com

Good call on absolute options. That could be very convenient,
especially in combination with MapThread.

On 5/9/05, Bob Hanlon <hanlonr at cox.net> wrote:
> $Version
> 
> 5.1 for Mac OS X (January 27, 2005)
> 
> Needs["Graphics`"];
> 
> Options[FilledPlot,Curves]
> 
> {Curves -> Back}
> 
> Curves->Back is the default.  Compare
> 
> FilledPlot[{Sin[x],Cos[x],x^2/18},{x,0,2 Pi}];
> 
> FilledPlot[{Sin[x],Cos[x],x^2/18},{x,0,2 Pi},
>     Curves->Front];
> 
> Use  Epilog in the DisplayTogether or with the Show
> 
> DisplayTogether[
>     plt1=FilledPlot[x^2/18,{x,0,2 Pi}],
>     plt2=FilledPlot[{Sin[x],Cos[x]},{x,0,2 Pi}],
>     Epilog->Text["This is the epilog",{2,1.5}]];
> 
> Show[plt1,plt2,
>     DisplayFunction->$DisplayFunction,
>     Epilog->Text["This is the epilog",{2,1.5}]];
> 
> Or carry the Epilog forward using AbsoluteOptions
> 
> DisplayTogether[
>     plt1=FilledPlot[x^2/18,{x,0,2 Pi},
>         Epilog->Text["This is the epilog 1",{2,1.5}]],
>     plt2=FilledPlot[{Sin[x],Cos[x]},{x,0,2 Pi},
>         Epilog->Text["This is the epilog 2",{2,2}]],
>     Epilog->{Epilog/.AbsoluteOptions[plt1],
>         Epilog/.AbsoluteOptions[plt2]}];
> 
> Show[plt1,plt2,
>     DisplayFunction->$DisplayFunction,
>     Epilog->{Epilog/.AbsoluteOptions[plt1],
>         Epilog/.AbsoluteOptions[plt2]}];
> 
> Bob Hanlon
> 
> >
> > From: AES <siegman at stanford.edu>
To: mathgroup at smc.vnet.net
> > Date: 2005/05/08 Sun AM 02:10:12 EDT
> > Subject: [mg56914] [mg56884] [mg56861]  FilledPlot: Curves->Back option and Epilog not
> working?
> >
> > I have a module that makes a filled plot.  I use it to make two (or
> > more) displaced filled plots, then Show these plots (code below).
> >
> > Everything works as expected, with two problems:
> >
> > *  The Curves->Back option never works.
> >
> > *  An additional line generated by an Epilog in the module only appears
> > in the final test plot.
> >
> > I'm beginning to realize that when multiple plots each having an Epilog
> > are combined using Show or DisplayTogether, only the *final* Epilog gets
> > executed.  Throwing in "Evaluates" at various stages in the process
> > doesn't seem to get around this.
> >
> > If this is true, maybe the description of Epilog in the online Help
> > should say this?  (Especially since it seems an intuitively *non*obvious
> > way for Epilog to behave -- shouldn't the stuff created by Epilog in a
> > Plot command become part of the plot once the plot command has been
> > executed?)
> >
> > I don't have a clue why Curves->Back doesn't work anywhere or any way
> > I've tried it (including changing Front to Back in the online Help
> > example).
> >
> >
> > wavePlot[<args>] := Module[{},
> >       <expressions>,
> >       FilledPlot[ <plot stuff> ,
> >             Curves -> Back,
> >             Epilog -> {Line[ <line stuff> ]},
> >             DisplayFunction -> Identity]];
> >
> > <set all the args>;
> >
> > testPlot1 = wavePlot[ <args> ];
> >
> > <reset all the args>;
> >
> > testPlot2 = wavePlot[ <args> ];
> >
> > Show[testPlot1, testPlot2,
> >          DisplayFunction -> $DisplayFunction,
> >          PlotRange -> All];
> >
> >
> 
> 


-- 
Chris Chiasson
http://chrischiasson.com/
1 (810) 265-3161

• References:
  • Re: FilledPlot: Curves->Back option and Epilog not working?
    • From: Bob Hanlon <hanlonr@cox.net>