matlab代碼

上傳人：奔*** IP屬地：河北更新時間：2024-03-02 格式：docx 頁數(shù)：9 大小：43.54KB 人氣指數(shù)：12 舉報 版權(quán)申訴

已閱讀1頁，還剩8頁未讀，繼續(xù)免費閱讀

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進行舉報或認領(lǐng)

文檔簡介

1、　　clear; clc;　　A = [1 0 1　　0 1 0　　1 0 0];　　B = [0.5 0.2 0.3];　　[m,n]

2、 = size(A);　　C = zeros(m,n);　　for i = 1:n　　C(:,i) = A(:,i) -B(i);　　End　　變權(quán) &l

3、t;/p>　　A=[]　　B=[]　　[n,m]=size(A)　　for i=1:m　　A(:,i)=A(:,i)/norm(A

4、(:,i))　　end　　for i=1:n　　C(i,:)=A(i,:).*B　　end 　　D=sum(C,2)

5、　　for i=1:m　　F(:,i)=A(:,i)-D　　end 　　G=F+1　　for i=

6、1:n　　H(i,:)=G(i,:).*B　　end 　　M=A.*H　　N=sum(M,2)　　關(guān)聯(lián)系數(shù)法（MATLAB代碼）

7、　　A=[]　　B=[]　　p=0.5　　[n,m]=size(A) <p

8、>　　for i=1:n　　D(i,:)=A(i,:).*B　　end 　　V0=sum(D,2)　　for i=1:n<

9、p>　　for j=1:m　　C(i,j)=abs(A(i,j)-V0(i))　　end　　end　　rmin=min(min(C))

10、 　　rmax=max(max(C)) 　　for i=1:n　　for j=1:m　　E(i,j)=(rmin+p*rm

11、ax)/(C(i,j)+p*rmax) 　　end　　end　　[n,m]=size(A)　　for i=1:n

12、R(i,:)=A(i,:).*B　　E(i,:)=R(i,:).*C　　end　　F=sum(E,2)　　for i=1:n <p&g

13、t;　　for j=1:m　　U(i,j)=E(i,j)./F(i)　　end　　end　　G=A.*U</p&g

14、t;　　H=sum(G,2)　　評價共識度　　[n,m]=size(L)　　for i=1:m 　　for j=1:m　　Y(i,j

15、)=dot(L(:,i),L(:,j))/( norm(L(:,i))*norm(L(:,j)))　　end　　end　　q=(sum(Y(:))-m)/(m*(m-1))　　f

16、or i=1:m　　X(i,:)=(sum(Y,2)-1)/ (m-1)　　end　　[n,m]=size(A)　　for i=1:n

17、　　C(i,:)=A(i,:).*B　　end 　　D=sum(C,2)　　求矩陣方差　　[n,m]=size(A)　　for i=1:

18、n　　C(i,:)=var(A(i,:))　　end　　W1=(1./(C+1))/(sum(1./(C+1)))　　W=0.7*B+0.3.*W1　　[n,m]=size

19、(A)　　for i=1:n　　C(i,:)= 0.6*B +0.4*A(i,:)　　end　　[n,m]=size(A)　　dot(A,B)/(norm

20、(A)*norm(B))　　[n,m]=size(A)　　C=A.*B　　D=sum(C,2)　　for i=1:m　　F(:,i)=D-A(:,i)&l

21、t;/p>　　end 　　G=F+1　　H=G.*B　　熵權(quán)法　　[n,m]=size(A)

22、　　for i=1:m　　A(:,i)=A(:,i)/norm(A(:,i))　　end　　R=A　　[rows,c

23、ols]=size(R)　　for i=1:cols　　R(:,i)=R(:,i)/norm(R(:,i))　　end　　k=1/log(rows)　　f=zeros(rows,cols)&l

24、t;/p>　　sumBycols=sum(R,1)　　for i=1:rows　　for j=1:cols　　f(i,j)=R(i,j)/sumBycols(1,j)　　end<

25、;p>　　end　　lnfij=zeros(rows,cols)　　for i=1:rows　　for j=1:cols　　if f(i,j)==0　　lnfij(i,j)=0</

26、p>　　else　　lnfij(i,j)=log(f(i,j))　　end　　end　　end

27、;　　hj=-k*(sum(f.*lnfij,1))　　weights=(1-hj)/sum(1-hj)　　相對熵　　n=length(x)　　f=zeros(1,n)

28、　　for i=1:n　　f(i)=x(i).*log(x(i)./y(i))　　end　　g=sum(f,2)　　專家變權(quán)</p&g

29、t;　　A=[]　　B=[]　　[n,m]=size(A)　　for i=1:n　　C(i,:)=A(i,:).*B

30、　　end 　　D=sum(C,2)　　for i=1:m　　F(:,i)=abs(D-A(:,i))　　end

31、　　G=max(F,[],2)　　for i=1:m　　H(:,i)=G-0.2*F(:,i)　　end 　　for i=1:n</

32、p>　　I(i,:)=H(i,:).*B　　end 　　for i=1:n　　M(i,:)=F(i,:).*B　　end <

33、/p>　　N=G-0.2*sum(M,2)　　for i=1:m　　W(:,i)=I(:,i)./N　　end　　O=A.* W&

34、lt;/p>　　P=sum(O,2)　　[n,m]=size(A)　　C=A.*B　　D=sum(C,2)　　for i=1:m

35、;　　F(:,i)=abs(D-A(:,i))　　end 　　G=max(F,[],2)　　for i=1:m　　H(:,i)=G-0.2*F(:,i)&

36、lt;b>　　end 　　I=H.*B　　M=F.*B　　N=G-0.2*sum(M,2)　　for i=1:m

37、　　W(:,i)=I(:,i)./N　　end　　[m,n]=size(A)　　for i=1:n　　for j=1:m</p&g

38、t;　　f(i)=x(i).*log(x(i)./y(i))　　[m,n]=size(A)　　for i=1:n　　A(:,i)=A(:,i)/norm(A(:,i))　　end</b&g

39、t;　　[rows,cols]=size(R)　　maxR=max(R,[],1)　　for i=1:rows　　for j=1:cols　　R(i,j)=R(i,j)/maxR(j)&l

40、t;b>　　end　　end　　for i=1:rows　　R(i,:)=R(i,:)/norm(R(i,:))　　end<

41、;b>　　偏離權(quán)重　　[n,m]=size(A)　　for i=1:n　　C(i,:)=A(i,:).*B　　end 　　D=s

42、um(C,2)　　for i=1:m　　F(:,i)=(D-A(:,i)).^2　　end 　　E=sum(F,2)　　偏好距離求權(quán)重&

43、lt;/b>　　[n,m]=size(A)　　B=prod(A,2).^(1/m)　　C=sum(B)　　D=B/C　　for i

44、=1:m　　F(:,i)=(D-A(:,i)).^2　　end　　E=sum(F,1)　　W=(1./E)./(sum(1./E))　　群體一致度<

45、/b>　　[n,m]=size(A)　　for i=1:m　　B=bsxfun(@minus,A(:,i) , A(:,i)')　　C=B.^2<p&g

46、t;　　D=1/2*(sum(sum(C))).^(1/2)　　end　　W=(1./D)/(sum(1./D))　　一致性檢驗　　A=[]

47、;　　[x,y]=eig(A)　　Jmax=max(max(y))　　[n,m]=size(A)　　RI=[0 0 0.58 0.90 1.12 1.24 1.32 1.41 1.45 1.49 1.51]　　CI=(Jmax-n)./(n-1)&l

48、t;/p>　　CR=CI./RI(1,n)　　自適應(yīng)權(quán)重　　A=[]　　B=[]　　D1=[]

49、;　　R=0　　[n,m]=size(A)　　C=A.*B　　D=sum(C,2)　　D2=(sum((D-D1).^2)).^(1/2)</p&g

50、t;　　while(D2>0.001)　　for i=1:m　　F(:,i)=abs(D-A(:,i))　　end 　　G=max(F,[],2)

51、　　for i=1:m　　H(:,i)=G-0.2*F(:,i)　　end 　　I=H.*B　　M=F.*B</b

52、>　　N=G-0.2*sum(M,2)　　for i=1:m　　W(:,i)=I(:,i)./N　　end　　B=W</b&

53、gt;　　D1=D　　R=R+1　　C=A.*B　　D=sum(C,2)　　D2=(sum((D-D1).^2)).

眾賞文庫> 全部分類> 畢業(yè)設(shè)計

溫馨提示

1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 眾賞文庫僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

matlab代碼

文檔簡介

溫馨提示

最新文檔

評論

matlab代碼

文檔簡介

溫馨提示

最新文檔

評論

免費下載