%ESTIMADOR DE LOS LAR.
%function LAR=logarea(r)
%Entradas:
%r:coeficientes de reflexión.
%Salidas:
%LAR:Log-Area-ratios.
function LAR=logarea(r)
for i=1:8
if(abs(r(i))<0.675) %Hacemos una codificación por intervalos.
LAR(i)=r(i);
elseif(abs(r(i))<0.95)
LAR(i)=sign(r(i))*(2*abs(r(i))-0.675);
elseif (abs(r(i))<=1)
LAR(i)=sign(r(i))*(8*abs(r(i))-6.375);
end
end
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
