求熵值法matlab程序！！！

w13king

熵值法有固定的程序可以套用的么？
7 X, F8 M+ u3 }: z" ?( J1 \$ K

各位好心的童鞋。。。
第一次接触这个。。。
, o8 ^" R) A8 @" Z$ U9 j- c$ q3 U不会。。。
& G9 K9 V7 |) V9 D希望大家帮帮忙！
; g2 N( J% G- z" M( S; N谢谢~~

逻辑学

商权法是用来做排序的

Reciprocal

谢谢了楼主

benfifi

A=[91.45        9.8        0        0        8.125
89.98        7        5        0        7.1875
4 E  V" n+ d& g& i6 w82.73        10        5        2        8.75
8 [. _. Y4 Y3 _. U, ^" j76.82        5        8        0        6.25
76.91        7.6        10        0        9.375
85.22        10        0        6        7.5
80.68        5.5        8        0        8.125
. G0 {# N3 w, L6 u. W- i84.59        3        0        0        4.6875
86.05        9.5        5        3        4.375
9 ~5 H5 [" ?7 G9 B1 @, ]83.89        10        0        0        5.3125
1 E" B# b, g* {) X81.43        1        8        0        7.5
87.15        0.5        0        0        5.625
73.22        1        0        0        3.75
92.82        10        5        4        9.0625];
[ma,na]=size(A);
B=zeros(1,na);
* ~* ]# ^' T1 ?) H% J4 j" [( f9 w9 BP=zeros(1,na);
, U  M4 `) k! N% EG=zeros(1,na);
7 S$ U: u1 r, h, W- y. MS=zeros(1,ma);
g=0;
a=0.5;
MAX=max(A);
( ]- S; `+ V  L% y" P  A( m5 r' M' cMIN=min(A);
9 m3 D6 u2 R# l) Hfor i=1:ma     
) M0 X" B" C/ q( q. `  m    for j=1:na      
        A(i,j)=((A(i,j)-MIN(j))/(MAX(j)-MIN(j)))*a+(1-a);   %标准化矩阵A
    end
2 F# K* G1 r% S) `3 g4 y5 c2 k8 U# G+ x# uend
for j=1:na     
    for i=1:ma     
        B(j)=B(j)+A(i,j);
: p3 @. N+ j7 s1 K0 s# m8 _( T- Q0 z    end
7 t9 |/ ?' v1 _) |7 s4 dend
for i=1:ma  
& z# x: G  q, D2 ]( Q7 A2 q% {    for j=1:na   
        A(i,j)=A(i,j)/B(j)
8 I0 m5 ~6 p$ n, t    end
end
5 s+ D( y# X! M) r6 J- B* {$ Cfor j=1:na
! u+ }& |% M$ j0 b* }, @    for i=1:ma
        P(j)=P(j)+A(i,j)*log(A(i,j));
    end
end
' Z  ~. u8 z: t* a( fk=1/log(na);
P=P*(-k)
# |) L% I* n0 {2 S* \/ Ffor j=1:na   
; }, s: O7 N& G    G(j)=1-P(j)
$ V% ?" g! w  `8 \    g=g+G(j);
* d1 s1 x" _& j4 zend
for j=1:na  
    b(j)=G(j)/g
; F; y/ s1 `4 U$ \% Kend
for i=1:ma
/ }7 b, M" O9 e9 M5 T1 L    for j=1:na
" n3 e$ {) N3 f        S(i)=b(j)*A(i,j)
    end
! [7 Y, Z9 M" O6 b( M7 n/ bend
        
7 _, n3 j- S& w+ z! _
: @5 I: s. {$ S& d- [  q4 @8 s
1 x/ ~5 ~4 H- }

4 [5 _6 L8 i( s1 n9 k1 f: M0 I

谢凌风

求高人指点。

小p才

真是好东西啊。。。。。

crystal9

希望可以有啊。。。我也要。。。

w13king

就是那个 纯净水安全监控问题
这是我们的大概方法。。。
% i7 E3 R8 ?6 Z# s1.对于问题1，通过分析首先确定各危害指标的权值，这里我们采取两种确定方法，即主成分分析和专家评定，考虑到因专家评定带有主观因素与事实可能不符，进一步用主成分分析法，依照客观数据给出结果，对两种方法进行综合考虑，取其平均值作为最终的权重。在此基础上建立了纯净水安全风险检测的科学评价模型，并对该城区所有批次的纯净水进行评判排序。
* u. D9 e% ~% {# e2.对于问题2，在问题一模型的基础上，按照每个公司各项危害指标的平均值最为该公司的危险指标，利用问题1的模型求出各公司的风险度，并进行排序。依据各公司的各项危害指标及风险度，分析公司共产品的主要可能的危害因素。
3.首先筛选出不合格的样品，根据问题一中建立的科学评价模型对其进行成因分析。利用熵值法求出各危害因素在生产流通环节上所占的权重。评价各个危害指标的分布规律。最后，通过四类危害指标的分析，讨论出A、B、D公司的管理情况。

6 l$ J, M3 \# G就是不知道那个熵值法怎么编程啊。。。

ykl126

大哥呀，下次说清楚一些好不

熙123

我也不知道呀！！无力！！