Animacion de graficos 3D en Matlab

Codigo del video tutorial 32, que trata sobre la animación de graficos avanzados en matlab parte 2/3, en el cual se aborda el tema de animación de graficos en 3D. El código se publica tal cual fue  presentado en el  curso.

clear all
clc
x=0:pi/100:4*pi;
y=x;
[X,Y]=meshgrid(x,y);
z=3*sin(X)+cos(Y);%ecuacion  principal
h=surf(z);
axis tight
set(gca,'nextplot','replacechildren');
shading interp
colormap(jet)
m=1;
for k =0:pi/100:2*pi;
    z=(sin(X)+cos(Y)).*sin(k);%ecuacion  principal modificada
    set(h,'Zdata',z);
    M(m)=getframe;
    m=m+1;
end
movie(M,2);