wiener程序.docVIP

function [f,noise] = wiener2(varargin) %WIENER2 2-D adaptive noise-removal filtering. % WIENER2 lowpass filters an intensity image that has been degraded by % constant power additive noise. WIENER2 uses a pixel-wise adaptive Wiener % method based on statistics estimated from a local neighborhood of each % pixel. % J = WIENER2(I,[M N],NOISE) filters the image I using pixel-wise adaptive % Wiener filtering, using neighborhoods of size M-by-N to estimate the local % image mean and standard deviation. If you omit the [M N] argument, M and N % default to 3. The additive noise (Gauss