% Peaks的动画
[x,y,z]=peaks(200);
k=1;
zz=zeros(200);
zz(:,end)=z(:,end);
close all
figure;
ss=surf(x,y,z);
C=get(ss,'CData');
close all
ss=surf(x,y,zz);
set(gcf,'doublebuffer','on');
shading interp
zlim([-10,10])
while k<200;
zz(:,end-k)=z(:,end-k);
set(ss,'ZData',zz);
set(ss,'CData',C);
pause(0.1);
k=k+1;
end
[x,y,z]=peaks(200);
k=1;
zz=zeros(200);
zz(:,end)=z(:,end);
close all
figure;
ss=surf(x,y,z);
C=get(ss,'CData');
close all
ss=surf(x,y,zz);
set(gcf,'doublebuffer','on');
shading interp
zlim([-10,10])
while k<200;
zz(:,end-k)=z(:,end-k);
set(ss,'ZData',zz);
set(ss,'CData',C);
pause(0.1);
k=k+1;
end