Re: more than 1 function with Plot3D

• To: mathgroup at smc.vnet.net
• Subject: [mg50843] Re: more than 1 function with Plot3D
• From: mathma18 at hotmail.com (Narasimham G.L.)
• Date: Thu, 23 Sep 2004 05:27:28 -0400 (EDT)
• References: <ci3edp\$e2f\$1@smc.vnet.net> <cidtco\$bt3\$1@smc.vnet.net> <cih0lg\$mk\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```"Ron" <ronhaus at arcor.de> wrote in message news:<cih0lg\$mk\$1 at smc.vnet.net>...
> But the 'Nutzenfunktion" is supposed to be a 3d plot (and not a plane one)
> and the other 2d function on that surface. I believe I have to use
> ParametricPlot3D combined with Show...

You can also 2D plot using different values of constant (instead of
0), for example,
NutzFunkt = 120 == (x1 + 20)*x2;

>
> "Narasimham G.L." <mathma18 at hotmail.com> schrieb im Newsbeitrag
> news:cidtco\$bt3\$1 at smc.vnet.net...
> > "Ron" <ronhaus at arcor.de> wrote in message
> > news:<ci3edp\$e2f\$1 at smc.vnet.net>...
> >> u(x1,x2) = (x1+20)*x2 (main function)             ->Nutzenfunktion
> >> 20 = 2x1 + x2                                     ->Budgetgeraden
> >> 60 = 2x2 + x2                                     ->Budgetgeraden
> >>
> >> 800 = (x1+20)*x2                                  -> Indifferenzkurve
> >
> > Jawohl,moeglich. But with a fresh Kernel.(See other post, Can't get
> > graph...)
> >
> > << Graphics`ImplicitPlot`
> > NutzFunkt = 0 == (x1 + 20)*x2;
> > BG1 = 20 == 2x1 + x2;
> > BG2 = 60 == 2x2 + x1;
> > IndiffK = 0 == x2 (x1 + 20) - 800 ;
> > VWL = ImplicitPlot[{NutzFunkt, BG1, BG2, IndiffK}, {x1, -100, 100},
> > {x2, -100,
> >       100}];
> > Cheers
> >

```

• Prev by Date: Re: How to simplify to a result that is real
• Next by Date: Implicit plot variations
• Previous by thread: Re: more than 1 function with Plot3D
• Next by thread: Simplify[ {Re[Sqrt[-1 + eta^2]], Im[Sqrt[-1 + eta^2]]}, eta<1]