繁體
|
簡體
Sclub交友聊天~加入聊天室當版主
(檢舉)
分享
新浪微博
QQ空间
人人网
腾讯微博
Facebook
Google+
Plurk
Twitter
Line
标题:
用 mathematica 求条件极佳
[打印本页]
作者:
TSC999
时间:
2017-5-19 18:01
标题:
用 mathematica 求条件极佳
本帖最后由 TSC999 于 2017-5-19 18:08 编辑
在 $ x+y=5 $ 的条件下,求 \( f(x,y)=3\sqrt{2x^2+1}+ 2\sqrt{9y^2+40} \) 的极小值。
用拉格朗日乘数法编程如下:
Clear["Global`*"];
NSolve[D[3 Sqrt[2 x^2 + 1] +
2 Sqrt[9 y^2 + 40] + \[Lambda] (x + y - 5), {{x,
y, \[Lambda]}}] == 0, {x, y}, {\[Lambda]}, Reals]
复制代码
运行结果是:
{{x->3.,y->2.}}
将 $ x=3, y=2 代入 f(x,y) $ 中得到:
$ f(x,y)=7\sqrt{19} $
作者:
TSC999
时间:
2017-5-19 18:13
头一次发现这个数学论坛。这是官办的还是民办的?有几年的历史了?人气旺不?
作者:
kuing
时间:
2017-5-19 18:14
直接用 Minimize 就好了啊
作者:
kuing
时间:
2017-5-19 18:18
回复
2#
TSC999
个人论坛
至于人气,这年头还上论坛玩的人已经不多,何况是圈子这么小的数学论坛,不可能旺的
作者:
TSC999
时间:
2017-5-19 19:10
直接用 Minimize 就好了啊
kuing 发表于 2017-5-19 18:14
您说的对,用下面这个语句更好:
In[27]:= Minimize[{3 Sqrt[2 x^2 + 1] + 2 Sqrt[9 y^2 + 40],
x + y == 5}, {x, y}]
Out[27]= {7 Sqrt[19],{x->3,y->2}}
复制代码
欢迎光临 悠闲数学娱乐论坛(第2版) (http://kuing.orzweb.net/)
Powered by Discuz! 7.2