求助：Mathematica函数绘图问题

MiNime

求助： , g; K" ~. W- ~9 s0 ff[y_]:=Maximize[{x+x Cos[y],0<=x<=2},x] 3 [' }/ a" X0 ?  W) \ % O0 z$ U" w& Z  S0 N1 y  z8 yPlot[Evaluate@f[y],{y,0,4}] 可正常画出曲线图 * J/ T. s+ ?9 |. {但运行下面代码就没有反应，求问是什么原因 6 u8 S/ N* i4 {# _f[y_]:=Maximize[{x+Cos[y],0<=x<=2},x] ' B1 `- v, f. C, u" \# B Plot[Evaluate@f[y],{y,0,4}]

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

! T2 q  h/ E  A+ \( d6 J

运行无反应

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

! X4 c7 ]1 ~2 Z; x

可绘图

; T2 b: J' t& u# j$ S8 i* k7 c7 B! A