Re: superposition of graphics

From: AES/newspost (siegman_at_stanford.edu)
Date: 09/28/04


Date: Tue, 28 Sep 2004 10:36:40 -0700

In article <V0f6d.3132$ls6.2199@newsread3.news.atl.earthlink.net>,
 "David Park" <djmp@earthlink.net> wrote:

>
> "hautot" <ahautot@ulg.ac.be> wrote in message news:mdam7iy9gour@legacy...
> > I want the superposition of say 10 sine functions in a single display.
> > A typical instruction like this :
> >
> > Show[Table[Plot[Sin[k x], {x, 0, 6}], {k, 1, 10}]]
> >
> > print individual graphs (not desired) and finally the asked
> > combination of them
> > How to avoid the first ones?
> > Thanks in advance

If I understand correctly what you want, I'd recommend

    Needs["Graphics`Graphics``"];

    DisplayTogether[
        Plot[ ],
        Plot[ ],
        Plot[ ],
        options];

I've become quite fond of this particular construct because

    --you can "read" it, see clearly what it does.
    --you can combine all kinds of graphics with it
    --you can set/modify the options all at the end
    --seems to work reliably w/o odd glitches or hassles

You could probably in fact just insert your Table into it
(without the Show)