You can use Rasterize[plot,"Image"]
on each frame as paw suggested.
img = Image3D[RandomReal[1, {5, 10, 10}]]
imageList =
Most@ParallelTable[
Rasterize[
Image3D[img,
ViewPoint -> {2.5 Cos[θ], 2.5 Sin[θ], 2},
ViewAngle -> 30 Degree], "Image"], {θ, 0, 2 Pi, 0.01 Pi}];
ListAnimate[imageList]
Export["animation.avi", imageList];
Export["animation.gif", imageList];
However, Export
already handles animations natively! (Although not for .gif
sadly.)
animation =
Animate[Image3D[img,
ViewPoint -> {2.5 Cos[θ], 2.5 Sin[θ], 2},
ViewAngle -> 30 Degree], {θ, 0, 2 Pi}]
Export["animation.avi", animation];
Rasterize
$\endgroup$Image3D
? $\endgroup$