求熵值法matlab程序！！！

w13king

熵值法有固定的程序可以套用的么？
/ }! ~- P" S" @: B4 J) ]- u  u+ i

* A4 V/ q. y& _9 i: ?) |各位好心的童鞋。。。
/ s; W1 R: z$ O+ f! p0 L第一次接触这个。。。
0 ?" Z7 M6 z0 c, p! ?# N不会。。。
2 `3 j. r8 O5 Z9 b% K/ i5 e希望大家帮帮忙！
- ], y6 f. }* c* F2 K谢谢~~

逻辑学

商权法是用来做排序的

Reciprocal

谢谢了楼主

benfifi

A=[91.45        9.8        0        0        8.125
( V% t: D1 V# @5 y7 E0 D8 P89.98        7        5        0        7.1875
82.73        10        5        2        8.75
76.82        5        8        0        6.25
& E5 ]& Z: m: f' T( w# i76.91        7.6        10        0        9.375
' J- l/ ^0 N1 J% u$ q85.22        10        0        6        7.5
80.68        5.5        8        0        8.125
84.59        3        0        0        4.6875
86.05        9.5        5        3        4.375
9 u( `* ~" n7 B1 @. T83.89        10        0        0        5.3125
2 T6 M$ v  R' I1 I' B5 Z( H81.43        1        8        0        7.5
87.15        0.5        0        0        5.625
73.22        1        0        0        3.75
& e& }2 g* J; a& V! K- p92.82        10        5        4        9.0625];
# d% n; |* b- c4 C[ma,na]=size(A);
B=zeros(1,na);
P=zeros(1,na);
/ P9 F6 [( r7 @: G: VG=zeros(1,na);
S=zeros(1,ma);
g=0;
a=0.5;
, w/ h9 }' _" K( C4 f" x7 F1 ^, @MAX=max(A);
. B% H8 n8 C3 J  Y# q: Z* f5 jMIN=min(A);
for i=1:ma     
    for j=1:na      
        A(i,j)=((A(i,j)-MIN(j))/(MAX(j)-MIN(j)))*a+(1-a);   %标准化矩阵A
! X, l- J' T* D0 y$ @& ]) y    end
end
for j=1:na     
    for i=1:ma     
        B(j)=B(j)+A(i,j);
7 n2 T- F% v7 K" B' J    end
  N0 q3 e7 Q9 P" e, hend
for i=1:ma  
$ e7 x% l) k# s9 i+ _9 g: v    for j=1:na   
        A(i,j)=A(i,j)/B(j)
    end
7 x5 p6 ^/ ^4 Y( U* \end
for j=1:na
- r1 d" h: V% p% a  |    for i=1:ma
$ w7 a1 ]; \% K( ]        P(j)=P(j)+A(i,j)*log(A(i,j));
    end
/ b, v2 z+ A4 n) J) L' p' C* Jend
k=1/log(na);
P=P*(-k)
) h5 p6 B/ P* s( _9 Wfor j=1:na   
8 f3 d5 B4 U5 O4 X& J    G(j)=1-P(j)
    g=g+G(j);
0 N. I7 c1 f5 f+ rend
* h; t  r) J) s6 Afor j=1:na  
+ A5 \8 T# B# L% W( n% @" i    b(j)=G(j)/g
end
/ q3 T3 |9 S3 ]for i=1:ma
1 A6 |7 `' V# O# _; E7 Z8 t    for j=1:na
        S(i)=b(j)*A(i,j)
: O( Z) F0 q; r# ]- A    end
end
        
7 j4 ]( O0 e, N% K! C

& r' |, l, X9 m& b' a/ Y; ~
$ w# E' N7 J) {& r, H1 i$ p
! B" W' z$ l4 }" P

谢凌风

求高人指点。

小p才

真是好东西啊。。。。。

crystal9

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

w13king

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

6 f* D) _9 j2 B8 n2 Q就是不知道那个熵值法怎么编程啊。。。

ykl126

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

熙123

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