Mathematica函数绘图问题

MiNime

求助： " v5 c- Q# B6 [1 v& Lf[y_]:=Maximize[{x+x Cos[y],0<=x<=2},x] Plot[Evaluate@f[y],{y,0,4}] 5 q8 t6 M3 y- o  g可正常画出曲线图 ) S6 Z5 Q  r" n& a$ q但运行下面代码就没有反应，求问是什么原因 ' }3 k! p  _. K$ Gf[y_]:=Maximize[{x+Cos[y],0<=x<=2},x] 4 o! j3 T% Q4 ]5 g   ^1 o8 y7 j9 nPlot[Evaluate@f[y],{y,0,4}] ( ?* G, W" \" x4 {9 d2 | 6 u, A) g6 p: O

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

3 G# j% J$ q; b4 s5 h9 F

运行无反应

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

可绘图

- R; S$ e5 L  a$ p$ p& s: F