New in Wolfram
Mathematica
8: Capacidad de visualización de información nueva y mejorada
◄
previous
|
next
►
Gráficos y visualización
Muestre el campo de gradiente en una superficie
Muestre el campo de gradiente negativo para una superficie.
In[1]:=
X
Plot3D[ (x^2 + y^2) Exp[1 - x^2 - y^2], {x, -3, 3}, {y, -3, 3}, PlotStyle -> Texture[StreamPlot[ Evaluate[-D[(x^2 + y^2) Exp[1 - x^2 - y^2], {{x, y}}]], {x, -3, 3}, {y, -3, 3}, Frame -> None, ImageSize -> Large]], Mesh -> None, ImageSize -> Large, PlotPoints -> 35]
Out[1]=