注册 |登录
已有 5108 次阅读 2015-5-5 11:04 |系统分类:科研笔记
aa = Table[Plot3D[%[t, r, z], {r, 0, 1}, {z, 0, 1}], {t, 0, 1, 0.1}];
Export["E:\aa.gif", aa, "DisplayDurations" -> 1]
推荐到博客首页
Archiver|手机版|科学网 ( 京ICP备07017567号-12 )
GMT+8, 2023-6-5 10:24
Powered by ScienceNet.cn
Copyright © 2007- 中国科学报社