Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

Re: more than 1 function with Plot3D

  • To: mathgroup at smc.vnet.net
  • Subject: [mg50684] Re: more than 1 function with Plot3D
  • From: mathma18 at hotmail.com (Narasimham G.L.)
  • Date: Fri, 17 Sep 2004 01:15:48 -0400 (EDT)
  • References: <ci3edp$e2f$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

"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: problem rendering GIF formatted files
  • Next by Date: Re: Help about "coin-run" problem......
  • Previous by thread: Re: more than 1 function with Plot3D
  • Next by thread: Re: more than 1 function with Plot3D