其他

开发平台：

Matlab

VisuThresh2.m：源码内容

							function [x] = VisuThresh2(y,type)
%
%%%%%%%%It's My Own Function!!!
%
% VisuThresh2-- Visually calibrated Adaptive Smoothing
%  Usage
%    x = VisuThresh2(y,type)
%  Inputs
%    y      2-D Signal upon which to perform visually calibrated Adaptive Smoothing
%    type   Type of thresholding, either 'Soft' (default) or 'Hard'
%  Outputs
%    x      Result
%
% References
%    ``Ideal Spatial Adaptation via Wavelet Shrinkage''
%    by D.L. Donoho and I.M. Johnstone.
%
	if nargin < 2,
		type = 'Soft';
	end
	thr = 2*sqrt(log(length(y))) ;
%
	if strcmp(type,'Hard'),
		x = HardThresh(y,thr);
	else
		x = SoftThresh(y,thr);
	end

						