http://qiita.com/HA_qiita/items/6aa56912943888925efe
メモ
x = 0:100; y = sin(x); writerObj = VideoWriter('test.avi'); open(writerObj); fig = plot(x,y); set(fig, 'XDataSource', 'x'); set(fig, 'YDataSource', 'y'); set(gca, 'Xlim', [0 100], 'Ylim', [-20 20]); set(gca,'nextplot','replacechildren'); for k = 0:20 y = k*sin(x); refreshdata(fig); frame = getframe(gcf); writeVideo(writerObj, frame); end close(writerObj);