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 > >