       RE: Urgent Plot problem

• To: mathgroup at smc.vnet.net
• Subject: [mg32060] RE: [mg32041] Urgent Plot problem
• From: "David Park" <djmp at earthlink.net>
• Date: Fri, 21 Dec 2001 03:57:32 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```Deniz,

You can combine the two plots with the Show statement. In order to suppress
the display of the original plots you can make them within a Block statement
that temporarily suppresses graphics display by setting \$DisplayFunction to
Identity.

Block[{\$DisplayFunction = Identity},
plot1 = Plot[Sin[x/100], {x, 0, 100}];
plot2 = Plot[Cos[x/100], {x, 200, 1000}]];
Show[plot1, plot2];

My DrawGraphics package, at my web site, is designed to facilitate the
combination of many plotting elements in a natural manner, without having to
turn the display off and on. There, the statement would be written as:

Needs["DrawGraphics`DrawingMaster`"]

Draw2D[
{Draw[Sin[x/100], {x, 0, 100}],
Draw[Cos[x/100], {x, 200, 1000}]},
Axes -> True];

David Park

> From: deniz.seker at arcelik.com.tr [mailto:deniz.seker at arcelik.com.tr]
To: mathgroup at smc.vnet.net
>
> Hi,
>
> I have a problem with Plot. For two different results of equations, I need
> to plot the results in one plot. For example, one domain has a range of
> 0-100 in x direction, and the other has a range of 200-1000. How can I
> comb,ne the results in one graph?
>
> regards,
>
> Deniz
>
>

```

• Prev by Date: Re: Is this a bug?
• Next by Date: Re: Urgent Plot problem
• Previous by thread: RE: Urgent Plot problem
• Next by thread: Re: Urgent Plot problem