f0=Import["~/courses/Spring2014/MATH089/animations/BWframes00000.gif"]

?FourierTransform

f0data=ImageData[f0];

Dimensions[f0data]

R0=f0data[[;;,;;,1]];

Dimensions[R0]