MathGroup Archive 2005

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

Search the Archive

Re: multiple 3d plots

  • To: mathgroup at smc.vnet.net
  • Subject: [mg56312] Re: multiple 3d plots
  • From: dh <dh at metrohm.ch>
  • Date: Fri, 22 Apr 2005 06:22:36 -0400 (EDT)
  • References: <d47te4$56k$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Hi Jürgen,

p1 = Plot3D[{x^2*y, Hue[0.5]}, {x, 1, 2}, {y, 1, 2}];
p2 = Plot3D[{3*x*(1/y), Hue[0.8]}, {x, 1, 2}, {y, 1, 2}];
Show[p1, p2];

SIncerely,Daniel
juejung wrote:
> how can i plot the following 2 3D-graphs into one graph so that i can see  
> where they intersect.
> 
> Plot3D[3*x^2*y , {x, 1, 2}, {y, 1, 2}];
> Plot3D[3*x^2*y , {x, 1, 2}, {y, 1, 2}];
> 
> Plot3D[{3*x^2*y,3*x^2*y},{x,1,2},{y,1,2}] would be nice but doesn't work,  
> since the second argument if for coloring the first. Is there an easy  
> solution?
> 
> thanks
> best
> juergen
> 


  • Prev by Date: Re: Sort problem
  • Next by Date: Re: Simplifying Jacobian elliptic functions
  • Previous by thread: Re: multiple 3d plots
  • Next by thread: Re: multiple 3d plots