[X, Y, Z]=peaks(30);
surfl(X, Y, Z);
axis([-3 3 -3 3 -10 10]);
axis off
shading interp;
colormap(hot);
m=moviein(15);
for i=1:100
   view(-37.5+24*(i-1),30)
   m(:,i)=getframe;
end

movie(m);