Re: The behaviour of DisplayTogether
- To: mathgroup at smc.vnet.net
- Subject: [mg17368] Re: [mg17285] The behaviour of DisplayTogether
- From: "David Park" <djmp at earthlink.net>
- Date: Mon, 3 May 1999 01:46:03 -0400
- Sender: owner-wri-mathgroup at wolfram.com
>Hello, everybody.
>
>My problem:
>I would combine graphics in a single plot using a simple iteration;
>for example, instead of
>
>DisplayTogether[{Plot[x^2,{x,-2,2}],Plot[2 x^2,{x,-2,2}],
> Plot[3 x^2,{x,-2,2}]}]
>
>I'd like to use:
>
>DisplayTogether[Table[Plot[a x^2,{x,-2,2}],{a,3}]]
>
>but this second syntax doesn't work (apparently because of the
delayed
>iteration in a), while the previous one has no problems.
>Would someone please help me?
>
>Gianluca Cruciani
>giancruc at tin.it
>Gianluca Cruciani
>
Gianluca,
Correct. Your statement does not work. If you Evaluate the argument it
works but produces the extra plots. The whole point of DisplayTogether
was not to do that. But this seems to work.
DisplayTogether[
Table[Plot[a
x^2,{x,-2,2},DisplayFunction->Identity],{a,3}]//Evaluate]
If you use my DrawingPaper packages, available at my web site you
don't run into these strange kinds of problems in combining plots.
There the statement would be
Show[Graphics[
{Table[Draw[a x^2, {x,-2,2}], {a,3}]}],
AspectRatio -> 1/GoldenRatio,PlotRange ->
Automatic,Background ->White,
{Axes -> True}];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/