Max solution using solve

Hi all,

when using solve to solve a simultaneous equation e.g. " solve({6*c+d=24,6*c^2+d^2=96}; " I will obtain two solutions, or with different values maybe even more, I want to put the solutions into an equation e.g." c^6*d" and obtain the maximum value from all the sets of solutions I have.

Any help I will be very grateful, at the moment I am working out by copying and pasting but it will get much harder as the number of solutions increases.

Thanks,

Alex

acer's picture

eval

> seq([eval(c^6*d,x),x], x in solve({6*c+d=24,6*c^2+d^2=96},[c,d]));
             3072000000
            [----------, [c = 20/7, d = 48/7]], [0, [c = 4, d = 0]]
               823543

> map2(op,1,[%]);
                                 3072000000
                                [----------, 0]
                                   823543

> max(%);
                                  3072000000
                                  ----------
                                    823543

Or, simply,

> max(seq(eval(c^6*d,x), x in solve({6*c+d=24,6*c^2+d^2=96},[c,d])));
                                  3072000000
                                  ----------
                                    823543

acer

Thank you

Thank you that is great, can now get down to some work.

Comment viewing options

Select your preferred way to display the comments and click "Save settings" to activate your changes.
}