求助：Mathematica函数绘图问题

MiNime

求助： f[y_]:=Maximize[{x+x Cos[y],0<=x<=2},x] 1 {7 N9 E3 s5 m; L, @; ` Plot[Evaluate@f[y],{y,0,4}] % }# P' f; F# P$ z/ Z) d可正常画出曲线图 7 N9 B5 G' V- Z- j. ^! K但运行下面代码就没有反应，求问是什么原因 " z; X; A4 T; ]5 @f[y_]:=Maximize[{x+Cos[y],0<=x<=2},x] 7 N. U4 p" u5 F* {$ M + i( f5 e- ]7 z1 Y& H) FPlot[Evaluate@f[y],{y,0,4}] ! `7 p( K/ }6 ^; Q7 A# y6 T6 E 7 R. E9 j: K/ h7 T3 E7 n) v

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

1 N' n6 x' ], m& R

运行无反应

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

3 o+ I+ g# o# d% g, D

可绘图

1 Y, U& S- _9 [- a: M9 V
, D& l; {/ a5 q2 [2 L5 W% o3 R
* S8 N0 D+ k" q$ O7 |