function DAclean=cleaneff(DACor) length = size(DACor,1); DAclean = zeros(langth,2); for i=1:length if DAcor(i,1)>0 && DAcor(i,2)>0 DAclean(i,1) = DACor(i,2)/(DACor(i,1)+DACor(i,2)); elseif DAcor(i,1)<0 && DAcor(i,2)>0 DAclean(i,1)=1; elseif DAcor(i,1)>0 && DAcor(i,2)<0 DAclean(i,1)=0; else DAclean(i,1)=NaN; end end