Arbitrary 3D Transformations 

Arbitrary transformations can be applied to coordinates of a 3D volume. This is often useful for simulating an effect or transforming a volume to align with another volume.

In[1]:=

X i = ImagePad[ ImageResize[ExampleData[{"TestImage3D", "CTengine"}], 100], 10]

Out[1]=

In[2]:=

X ImageTransformation[i, # + {0, 0, Sin[20 #[[1]]]/20} &, PlotRange -> All]

Out[2]=

Play Animation Stop Animation