【图像处理】Mathematica与逆Fourier变换

1、原图如下。

2、经过Fourier变换之后，结果如下。b = Fourier[a];Log[Abs[b]*50] // Image

3、逆向Fourier变换：c = InverseFourier[b];c//Image

4、Abs[c]//Image复原了。

5、对b进行共轭处理：b = Conjugate[b];罕铞泱殳c = InverseFourier[b];Abs[c] // Image图像旋转了180度，而且颜色也变了。

6、砍掉大部分低频信号，图像还原易七淄苷之后，还保留着主要信息。b = Fourier[a]; n = 20;b[[n ;; -n, n ;; -n]] = b[[荏鱿胫协n ;; -n, n ;; -n]]*0;c = InverseFourier[b];Abs[c] // Image

7、n=10的情形。

8、n=5的情形。