MathGroup Archive 2002

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

Search the Archive

Re: 3D plotting

  • To: mathgroup at smc.vnet.net
  • Subject: [mg34058] Re: 3D plotting
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Wed, 1 May 2002 08:00:28 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <aag9ee$1s8$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Rex_chaos wrote:
> 
> Can anyone tell me how to plot two 3D graph in a same figure?
> 
> Thanks!

Hi,

do you mean ?

Block[{$DisplayFunction = Identity}, 
    plt1 = Plot3D[Sin[x*y], {x, 0, Pi}, {y, 0, Pi}];
    plt2 = Plot3D[Cos[x*y], {x, 0, Pi}, {y, 0, Pi}];
    ];
Show[plt1, plt2]

Regards
  Jens


  • Prev by Date: SubscriptSymbols Package Improved
  • Next by Date: force-field lines
  • Previous by thread: SubscriptSymbols Package Improved
  • Next by thread: force-field lines