Here's something you can start from
%%Some data
A=rand(9000,21);
figure;
%%Config axes
axes('view',[0 90],'color','none');hold on
h=surf(nan(60,21))
axis tight
%%Draw frames sequentially with a pause between frames
for i=1:100;
h.ZData=A(60*(i-1)+1:60*i,:)
pause(1)
end
