稀疏三维变换协同滤波图像去噪MATLAB代码

包括基于三维协同滤波的黑白、彩色、视频图像处理MATLAB代码等，亲测有效

function [PSNR y_est] = BM3D（y z sigma profile print_to_screen）
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
%  BM3D is an algorithm for attenuation of additive white Gaussian noise from 
%  grayscale images. This algorithm reproduces the results from the article:
%
%  [1] K. Dabov A. Foi V. Katkovnik and K. Egiazarian “Image Denoising 
%      by Sparse 3D Transform-Domain Collaborative Filtering“ 
%      IEEE Transactions on Image Processing vol. 16 no. 8 August 2007.
%      preprint at http://www.cs.tut.fi/~foi/GCF-BM3D.
%
%
%  FUNCTION INTERFACE:
%
%  [PSNR y_est] = BM3D（y z sigma profile print_to_screen）
%
%  ! The function can work without any of the input arguments 
%   in which case the internal default ones are used !
% 
%  BASIC USAGE EXAMPLES:
%
%     Case 1） Using the default parameters （i.e. image name sigma etc.）
% 
%      [PSNR y_est] = BM3D;
% 
%     Case 2） Using an external noisy image:
%
%      % Read a grayscale image and scale its intensities in range [01]
%      y = im2double（imread（‘Cameraman256.png‘））; 
%      % Generate the same seed used in the experimental results of [1]
%      randn（‘seed‘ 0）;
%      % Standard deviation of the noise --- corresponding to intensity 
%      %  range [0255] despite that the input was scaled in [01]
%      sigma = 25;
%      % Add the AWGN with zero mean and standard deviation ‘sigma‘
%      z = y + （sigma/255）*randn（size（y））;
%      % Denoise ‘z‘. The denoised image is ‘y_est‘ and ‘NA = 1‘ because 
%      %  the true image was not provided
%      [NA y_est] = BM3D（1 z sigma）; 
%      % Compute the putput PSNR
%      PSNR = 10*log10（1/mean（（y（:）-y_est（:））.^2））
%      % show the noisy image ‘z‘ and the denoised ‘y_est‘
%      figure; imshow（z）;   
%      figure; imshow（y_est）;
% 
%     Case 3） If the original image y is provided as the first input 
%      argument then some additional information is printed （PSNRs 
%      figures etc.）. That is “[NA y_est] = BM3D（1 z sigma）;“ in the
%      above code should be replaced with:
% 
%      [PSNR y_est] = BM3D（y z sigma）;
% 
% 
%  INPUT ARGUMENTS （OPTIONAL）:
%
%     1） y （matrix M x N）: Noise-free image （needed for computing PSNR）
%                           replace with the scalar 1 if not available.
%     2） z （matrix M x N）: Noisy image （intensities in range [01] or [0255]）
%     3） sigma （double）  : Std. dev. of the noise （corresponding to intensities
%                          in range [0255] even if the range of z is [01]）
%     4） profile （char）  : ‘np‘ --> Normal Profile 
%                          ‘lc‘ --> Fast Profile
%     5） print_to_screen : 0 --> do not print output information （and do 
%                                not plot figures）
%                          1 --> print information and plot figures
%
%  OUTPUTS:
%     1） PSNR （double）          : Output PSNR （dB） only if the original 
%                                 image is available otherwis

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       9669  2011-08-26 04:12  程序\BM3D-SAPCA\BM3DSAPCA2009.p

     文件       1592  2011-08-26 04:33  程序\BM3D-SAPCA\demo_BM3DSAPCA.m

     文件       1699  2008-03-25 23:22  程序\BM3D-SAPCA\function_AnisLPAICI8.p

     文件       5192  2008-03-25 23:22  程序\BM3D-SAPCA\function_CreateLPAKernels.m

     文件       6420  2008-03-25 23:22  程序\BM3D-SAPCA\function_LPAKernelMatrixTheta.m

     文件       2356  2008-03-25 23:22  程序\BM3D-SAPCA\function_Window2D.m

     文件       2860  2008-03-25 23:22  程序\BM3D-SAPCA\function_WOSFilters.p

     文件       1825  2011-08-26 17:21  程序\BM3D-SAPCA\README-BM3D-SAPCA.txt

     文件      22796  2016-04-26 22:32  程序\BM3D.m

     文件    3357190  2016-04-15 19:37  程序\BM3D.zip

     文件      17170  2014-01-30 18:47  程序\BM3DDEB.m

     文件      17668  2009-06-17 14:58  程序\BM3DSHARP.m

     文件      17778  2014-01-31 03:47  程序\BM3D_CFA.m

     文件      73125  2014-01-30 19:26  程序\bm3d_CFA_thr.mexa64

     文件      48288  2014-01-31 03:33  程序\bm3d_CFA_thr.mexglx

     文件      58644  2013-12-02 11:38  程序\bm3d_CFA_thr.mexmaci64

     文件      73728  2013-11-28 02:15  程序\bm3d_CFA_thr.mexw32

     文件      90624  2013-11-27 19:43  程序\bm3d_CFA_thr.mexw64

     文件      43392  2014-01-30 19:29  程序\bm3d_CFA_wiener.mexa64

     文件      31763  2014-01-31 03:33  程序\bm3d_CFA_wiener.mexglx

     文件      38052  2013-12-02 11:38  程序\bm3d_CFA_wiener.mexmaci64

     文件      56832  2013-11-28 02:26  程序\bm3d_CFA_wiener.mexw32

     文件      67584  2013-11-27 19:46  程序\bm3d_CFA_wiener.mexw64

     文件      55065  2011-06-01 18:48  程序\bm3d_thr.mexa64

     文件      41369  2011-06-01 18:41  程序\bm3d_thr.mexglx

     文件      58764  2011-06-03 17:25  程序\bm3d_thr.mexmaci

     文件      54552  2011-06-03 17:24  程序\bm3d_thr.mexmaci64

     文件      72704  2011-06-01 17:04  程序\bm3d_thr.mexw32

     文件      90624  2011-06-01 12:31  程序\bm3d_thr.mexw64

     文件      39669  2011-06-01 18:48  程序\bm3d_thr_color.mexa64

............此处省略72个文件信息