@无影冬瓜 @guocong89看了网友“无影冬瓜”仁兄提供的网页,英语渣,不是很明白,只能机械地照搬。解决这个问题的残影(我问的就是这一点)和流畅性如下:
Table[Graphics3D[Cuboid[{0, 0, 0}], SphericalRegion -> True,
ImageSize -> 300, ViewPoint -> 3. { Sin[t], Cos[t], 1}], {t,
Range[0, 4.4, 0.2]}]
Export["animation7.gif", %, "TransparentColor" -> White,
"TransitionEffect" -> Background]
图片:
本想厚颜请无影冬瓜仁兄翻译一下那里面除代码外的话,这个要求挺过分的,算啦。感谢帮助!