通常习惯下大家习惯移频一下看频谱,主要原因是让低频( 图片中的信号多是低频平滑、非突变的,突变的噪点一般而言都是高频)集中在一起方便观察图片信息,但这不是必须的,有时候甚至要避免,这主要是根据你希望得到什么信息,以及后期需要做什么处理,如 xzczd 所说,正常使用mma自带的ImagePeriodogram就可以了(当然,这个函数默认是会移频的,注意选项Alignment,如果指定Alignment -> {Left, Top},那就是不移了)。如果要自造轮子,参考如下
pic = ColorConvert[ExampleData[{"TestImage", "Lena"}], "Grayscale"];
Method one:
ImageAdjust[
Image[RotateLeft[Log10[PeriodogramArray[pic]],
Floor[Dimensions@ImageData[pic]/2]]]]

这办法PeriodogramArray的帮助文档也有,不过我通常不用,因为我不喜欢用RotateLeft,感觉如果图片维数是奇数就落了一格,心里有疙瘩,虽然对图片处理并无明显影响。
Method two:
ImageAdjust@
Image@Log10@
Abs@Fourier[
ImageData[pic]*
PadRight[{{}}, Dimensions[ImageData[pic]], {{1, -1}, {-1, 1}}]]
