This is the from the the very good book of Hazrat
He used Mathematica 7.0.
In Mathematica 10.3 one gets
f[x_, y_] := Sin[x^2 + y^2] Exp[-x^2] + Cos[x^2 + y^2]
g2 = Plot3D[f[x, y], {x, -2, 2}, {y, -2, 2}, PlotPoints -> 50,
Axes -> False, Boxed -> False]
How can I restore the PlotStyle
of version 7?
Thanks.
PlotTheme -> "Classic"
. $\endgroup$ – J. M.'s ennui♦ Nov 27 '15 at 17:39PlotTheme -> None
. $\endgroup$ – Karsten 7. Nov 27 '15 at 17:47PlotTheme
was introduced in version 10.0. $\endgroup$ – Karsten 7. Nov 27 '15 at 18:07