studentパッケージのextremaコマンドを用いると、条件付き極値を求めることができます。
例えば、条件g(x,y)=x2+(y2/4)=1の下での関数f(x,y)=xyの極値を求めるには次のように入力します。
>with(student):
>extrema(x*y,x2+y2/4=1,{x,y},'s') (条件付き極値を計算)
>s (極値点の候補を表示)
|
>plot3d(piecewise(x2+y2/4>0.9 and x2+y2/4<1.1 , x*y,none), x=-2..2,y=-2..2,grid=[100,100]) |
[正解例]