denoising-historical-data/PQevalAudio/Misc/PQWOME.m
2021-08-30 18:42:12 +03:00

14 lines
389 B
Matlab

function W2 = PQWOME (f)
% Generate the weighting for the outer & middle ear filtering
% Note: The output is a magnitude-squared vector
% P. Kabal $Revision: 1.1 $ $Date: 2003/12/07 13:34:11 $
N = length (f);
for (k = 0:N-1)
fkHz = f(k+1) / 1000;
AdB = -2.184 * fkHz^(-0.8) + 6.5 * exp(-0.6 * (fkHz - 3.3)^2) ...
- 0.001 * fkHz^(3.6);
W2(k+1) = 10^(AdB / 10);
end