1、模糊处理:c = Blur[#, 6] &@a
2、然后锐化处理:d = Sharpen[c, 6]
3、反复进行模糊、锐化的交替:b = NestList[Sharpen[Blur[#, 6], 6] &, a, 10]你会发现,图像质量越来越差。
4、这是反复100次后的结果。每次都是先模糊、后锐化,但是图像并没有复原,而是不断积累损失,最后大变模样。
5、那么,每隔3次,我们来查看一下处理结果,就可以看出,损失确实是越来越大:b = NestList[Sharpen[Blur[#, 6], 6] &, a, 37];d = (Partition[b, 3] // Transpose)[[1]];