bayesshrink.m

来自「自己编写的小波去噪原程序,使用的是轶值降噪的方法」· M 代码 · 共 7 行

function [w1] = BayesShrink(y,T)
% Bayes Shrinkage Function

R  = abs(y);
R = R - T;
R  = R .* (R > 0);
w1 = y .* R./abs(y);