Re: How do I combine Solve and Maximize?
- To: mathgroup at smc.vnet.net
- Subject: [mg65766] Re: How do I combine Solve and Maximize?
- From: "Chris Chiasson" <chris.chiasson at gmail.com>
- Date: Mon, 17 Apr 2006 02:28:03 -0400 (EDT)
- References: <e1suac$c5q$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
David:
This can't be (all of) your real Mathematica code, as there is only one
error from the cut and pasted code:
Solve::eqf x>0 is not a well formed equation
I recommend pasting (all of the InputForm) of your code.
Also, what is A980?
One problem is the use of Solve on a system of equations/inequalities
that is not algebraic (well, I could be wrong). You could use FindRoot
in this case, because your inequality is a restriction on the
independant variable.
Another problem is the use of SetDelayed (its infix form looks like
this := ) when it wouldn't produce dfferent output than using Set
(its infix form looks like this = ).
Since one of your comments says "What values of x causes f1==80", I
would recommend:
In[8]:=
f[x_,y_]=-(x-10)^2-(y-10)^2+100;
In[9]:=
Maximize[{f[x,y],y>0,x>0},{x,y}]
Out[9]=
{100,{x\[Rule]10,y\[Rule]10}}
or maybe the RootSearch package someone mentioned a few days ago
or you could just use calculus??
Good Luck,