exm07512_1.m

来自「这是本人收集的一些程序源代码」· M 代码 · 共 10 行

%exm07512_1.m
shg;clf;
[X,Y] = meshgrid([-2:.2:2]);
Z = 4*X.*exp(-X.^2-Y.^2);
G=gradient(Z);
subplot(1,2,1),surf(X,Y,Z,G)
subplot(1,2,2),h=surf(X,Y,Z,G);
rotate(h,[-2,-2,0],30,[2,2,0])
colormap(jet)