求助：Mathematica函数绘图问题

MiNime

求助： - ^' Z# B  \% }4 |* ~, Q2 c& S+ p- df[y_]:=Maximize[{x+x Cos[y],0<=x<=2},x] - F# V/ q0 {: E" |  ]- p 7 Q& e  Q, e( V1 f! c' NPlot[Evaluate@f[y],{y,0,4}] . M: `& ]  r7 Z/ a* L可正常画出曲线图 1 P$ R/ \1 `/ N7 n- X1 |3 E/ M但运行下面代码就没有反应，求问是什么原因 f[y_]:=Maximize[{x+Cos[y],0<=x<=2},x] Plot[Evaluate@f[y],{y,0,4}] * z) M( l2 f- a4 ^ 3 S/ b) m8 M& S

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

' v$ F5 Z  o7 S) ^. r# Q

运行无反应

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

可绘图

& D! C' N" J  G8 |4 S
) X0 I7 H6 ]7 ~
$ m* B& U8 @. v) Y) _: N! T& k7 N