mathematica直接将绘制的多幅图片导出成Gif

2021-11-08  本文已影响0人  phyiuang

SetDirectory[NotebookDirectory[]];

MapIndexed[Export[ToString@First@#2 <> ".png", #] &, {figList}];

files = FileNames["*.png", Directory[]];

picLists = Import /@ files;

Export["listAnimate.gif", picLists , "DisplayDurations" -> 1,  "AnimationRepetitions" -> Infinity];

SystemOpen["listAnimate.gif"]

上一篇 下一篇

猜你喜欢

热点阅读