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
djmp at earthlink.net
http://home.earthlink.net/~djmp/
> 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
>
>