function d=hec(a,b)
%計算矩陣的取小
% a=[1.0 0.8 0.7 0.4 0.1 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0];
% b=[1.0 0.7 0.3 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0]';
b=b';
for i=1:1:length(a)
    for j=1:1:length(b)
        if a(i)>=b(j)
            Ra(i,j)=b(j);
        else
            Ra(i,j)=a(i);
        end
    end
end
d=Ra;