MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Three graph into one

  • To: mathgroup at smc.vnet.net
  • Subject: [mg47971] Re: Three graph into one
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Tue, 4 May 2004 01:08:51 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <c6up2a$b68$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

graph2 = {{0.1, 0.5},
{0.2, 0.6},
{0.3, 0.8}};
graph3 = {{0.1, 0.8},
{0.2, 0.9},
{0.3, 0.10}};

Plot[Exp[x], {x, 0, 0.4},
  Epilog -> {AbsolutePointSize[4], {RGBColor[1, 0, 0], 
        Point /@ graph2}, {RGBColor[0, 1, 0], Point /@ graph3}}, 
  PlotRange -> {0, 2}]

Regards
  Jens

why wrote:
> 
> suppose I have
> 
>   y=e^x [where x=0.5 to 1.5];
> 
> and after interpolation I found x ,y values
> 
> graph2--values
> ............
> x     y
> 0.1   0.5
> 0.2   0.6
> 0.3   0.8
> ---------------
> graph3--values
> ...........
> x     y
> 0.1   0.8
> 0.2   0.9
> 0.3   0.10
> 
> Now I want mathematica to plot the graph1 and graph2
> with the give function y=e^x (superimposed).
> 
> Please help me .


  • Prev by Date: Re: Remove["Global`"] ??
  • Next by Date: Re: Remove["Global`"] ??
  • Previous by thread: RE: Do Modules Produce Side Effects?
  • Next by thread: Re: Three graph into one