Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > comp.soft-sys.math.mathematica > #2625

Re: Maximize a single variable and solve for the rest

From FranD <seacrofter001@yahoo.com>
Newsgroups comp.soft-sys.math.mathematica
Subject Re: Maximize a single variable and solve for the rest
Date 2011-05-23 10:24 +0000
Organization Steven M. Christensen and Associates, Inc and MathTensor, Inc.
Message-ID <irdcku$3lp$1@smc.vnet.net> (permalink)

Show all headers | View raw


This appars to work:

r1 = 3/4; r2 = 1;

Maximize[{c, 
b == c*r1 && h + s + b + d == 1 && d == c*r2 && h == s && b + d <= 9/10, c <= 9}, {h, s, b, d, c}]

Out = {18/35, {h -> 1/20, s -> 1/20, b -> 27/70, d -> 18/35, c -> 18/35}}

FranD

----

Hello,

I have a problem where I would like to solve an equation (namely (h+s+b+d==1) with some constraints, while maximizing for a related variable "c" (c<=9). Please see below, any suggestions?

r1 = 3/4;
r2 = 1;
Block[{h, s, b, d, c},
NMaximize[{h + s + b + d,
b == c*r1 && h + s + b + d == 1 && d == c*r2 && h == s &&
b + d <= 0.9}, {h, s, b, d, c}]]

{1., {h -> 0.5, s -> 0.5, (3 c)/4 -> 0., c -> 0., c -> 0.}}

Should I be using NSolve?

Thanks in advance,
Ramiro

Back to comp.soft-sys.math.mathematica | Previous | Next | Find similar | Unroll thread


Thread

Re: Maximize a single variable and solve for the rest FranD <seacrofter001@yahoo.com> - 2011-05-23 10:24 +0000

csiph-web