Mathematica函数绘图问题

MiNime

求助： $ c3 _% }" V1 J6 m  \f[y_]:=Maximize[{x+x Cos[y],0<=x<=2},x] ; i: i, ~0 L6 K' G7 t: oPlot[Evaluate@f[y],{y,0,4}] 可正常画出曲线图 但运行下面代码就没有反应，求问是什么原因 f[y_]:=Maximize[{x+Cos[y],0<=x<=2},x] 6 F/ }6 z% T% RPlot[Evaluate@f[y],{y,0,4}] % w: ^* \( I9 N/ } : p# E  ?4 d' d5 p! X % A" x! P$ G9 `9 a. \& C5 i 8 X% E7 k8 d4 }* e

2.jpg (46.23 KB, 下载次数: 0)

运行无反应

1.jpg (52.71 KB, 下载次数: 0)

( L" P2 i$ \- t' A7 O

可绘图

! ~4 h- k6 M% d' j7 t- _. v