【源代码】信息熵法算权重
2016-03-21 13:03
239 查看
function ww=xxs(RD,n,m) %1、无量纲规范矩阵RD %2、计算每个指标的熵值 k=1/log(n); for i=1:m for j=1:n f(j,i)=RD(j,i)/sum(RD(:,i)); temp(j,i)=f(j,i)*log(f(j,i)); end H(i)=-k*sum(temp(:,i)); end %3、计算每个指标的熵权值 sum_H=0; for i=1:m sum_H=sum_H+(1-H(i)); end ww=(1-H)/sum_H; %ww为向量