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: [mg50633] Re: [mg50613] more than 1 function with Plot3D
  • From: Matthias.Bode at oppenheim.de
  • Date: Wed, 15 Sep 2004 01:49:28 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi Ron,

are your equations correct?

60 = 2*x2 + x2 => x2=20
hence:
20 = 2*x1 + 20 => x1=0

???

Best regards,
Matthias Bode
Sal. Oppenheim jr. & Cie. KGaA
Untermainanlage 1
D-60329 Frankfurt am Main
GERMANY
Tel.: +49(0)69 71 34 53 80
Mobile: +49(0)172 6 74 95 77
Fax: +49(0)69 71 34 95 380
E-mail: matthias.bode at oppenheim.de
Internet: http://www.oppenheim.de



-----Ursprüngliche Nachricht-----
Von: Ron [mailto:ronhaus at arcor.de] 
Gesendet: Montag, 13. September 2004 08:19
An: mathgroup at smc.vnet.net
Betreff: [mg50613] more than 1 function with Plot3D


Hi,
I would like to plot the functions

u(x1,x2) = (x1+20)*x2 (main function)    ->Nutzenfunktion

20 = 2x1 + x2                                        ->Budgetgeraden
60 = 2x2 + x2                                        ->Budgetgeraden

800 = (x1+20)*x2                                    -> Indifferenzkurve

(Volkswirtschaftslehre VWL)

Is it somehow possible, I'd like to have all functions in one graph.

So far:
Plot3D[(a + 20)b, {a, 0, 30}, {b, 0, 30}, AxesLabel -> {"x1", "x2", 
"Nutzen"}]


THX 


  • Prev by Date: Re: Log[4]==2*Log[2]
  • Next by Date: creating help topic
  • Previous by thread: more than 1 function with Plot3D
  • Next by thread: Re: more than 1 function with Plot3D