求助：Mathematica函数绘图问题

MiNime

求助： f[y_]:=Maximize[{x+x Cos[y],0<=x<=2},x] 5 X: p) S* a. I 2 k- t  X! A  S) e) e7 W' NPlot[Evaluate@f[y],{y,0,4}] 可正常画出曲线图 " H' O9 s# }& V9 q8 j8 _% O" e2 d* P但运行下面代码就没有反应，求问是什么原因 " q/ ~1 e' m1 J4 _9 E1 h7 ]' j: [f[y_]:=Maximize[{x+Cos[y],0<=x<=2},x] ; b) N8 f" h4 _Plot[Evaluate@f[y],{y,0,4}] ' v) Y  s1 C' K- ~) H! j

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

运行无反应

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

0 k4 G6 \! q+ ]' N$ \+ L. e. w

可绘图