已阅读5页,还剩4页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
clear; clc;A = 1 0 1 0 1 0 1 0 0;B = 0.5 0.2 0.3;m,n = size(A);C = zeros(m,n);for i = 1:n C(:,i) = A(:,i) -B(i);End变权 A=B=n,m=size(A)for i=1:mA(:,i)=A(:,i)/norm(A(:,i)endfor i=1:nC(i,:)=A(i,:).*Bend D=sum(C,2)for i=1:mF(:,i)=A(:,i)-Dend G=F+1for i=1:nH(i,:)=G(i,:).*Bend M=A.*HN=sum(M,2)关联系数法 (MATLAB代码)A=B=p=0.5n,m=size(A) for i=1:nD(i,:)=A(i,:).*Bend V0=sum(D,2)for i=1:n for j=1:m C(i,j)=abs(A(i,j)-V0(i) endendrmin=min(min(C) rmax=max(max(C) for i=1:n for j=1:m E(i,j)=(rmin+p*rmax)/(C(i,j)+p*rmax) endendn,m=size(A)for i=1:nR(i,:)=A(i,:).*BE(i,:)=R(i,:).*CendF=sum(E,2)for i=1:n for j=1:mU(i,j)=E(i,j)./F(i)endendG=A.*UH=sum(G,2)评价共识度n,m=size(L)for i=1:m for j=1:mY(i,j)=dot(L(:,i),L(:,j)/( norm(L(:,i)*norm(L(:,j)endendq=(sum(Y(:)-m)/(m*(m-1)for i=1:m X(i,:)=(sum(Y,2)-1)/ (m-1)endn,m=size(A)for i=1:nC(i,:)=A(i,:).*Bend D=sum(C,2)求矩阵方差n,m=size(A)for i=1:nC(i,:)=var(A(i,:)endW1=(1./(C+1)/(sum(1./(C+1)W=0.7*B+0.3.*W1n,m=size(A)for i=1:nC(i,:)= 0.6*B +0.4*A(i,:)endn,m=size(A)dot(A,B)/(norm(A)*norm(B)n,m=size(A)C=A.*BD=sum(C,2)for i=1:mF(:,i)=D-A(:,i)end G=F+1H=G.*B熵权法n,m=size(A)for i=1:mA(:,i)=A(:,i)/norm(A(:,i)endR=Arows,cols=size(R)for i=1:colsR(:,i)=R(:,i)/norm(R(:,i)endk=1/log(rows)f=zeros(rows,cols)sumBycols=sum(R,1)for i=1:rows for j=1:cols f(i,j)=R(i,j)/sumBycols(1,j)endendlnfij=zeros(rows,cols)for i=1:rows for j=1:cols if f(i,j)=0 lnfij(i,j)=0 else lnfij(i,j)=log(f(i,j)end endendhj=-k*(sum(f.*lnfij,1)weights=(1-hj)/sum(1-hj)相对熵n=length(x)f=zeros(1,n)for i=1:nf(i)=x(i).*log(x(i)./y(i)endg=sum(f,2)专家变权A=B=n,m=size(A)for i=1:nC(i,:)=A(i,:).*Bend D=sum(C,2)for i=1:mF(:,i)=abs(D-A(:,i)end G=max(F,2)for i=1:mH(:,i)=G-0.2*F(:,i)end for i=1:nI(i,:)=H(i,:).*Bend for i=1:nM(i,:)=F(i,:).*Bend N=G-0.2*sum(M,2)for i=1:mW(:,i)=I(:,i)./NendO=A.* WP=sum(O,2)n,m=size(A)C=A.*BD=sum(C,2)for i=1:mF(:,i)=abs(D-A(:,i)end G=max(F,2)for i=1:mH(:,i)=G-0.2*F(:,i)end I=H.*BM=F.*BN=G-0.2*sum(M,2)for i=1:mW(:,i)=I(:,i)./Nendm,n=size(A)for i=1:nfor j=1:mf(i)=x(i).*log(x(i)./y(i)m,n=size(A)for i=1:nA(:,i)=A(:,i)/norm(A(:,i)endrows,cols=size(R)maxR=max(R,1)for i=1:rowsfor j=1:cols R(i,j)=R(i,j)/maxR(j)endendfor i=1:rowsR(i,:)=R(i,:)/norm(R(i,:)end偏离权重n,m=size(A)for i=1:nC(i,:)=A(i,:).*Bend D=sum(C,2)for i=1:mF(:,i)=(D-A(:,i).2end E=sum(F,2)偏好距离求权重n,m=size(A)B=prod(A,2).(1/m)C=sum(B)D=B/Cfor i=1:mF(:,i)=(D-A(:,i).2endE=sum(F,1)W=(1./E)./(sum(1./E)群体一致度n,m=size(A)for i=1:mB=bsxfun(minus,A(:,i) , A(:,i)C=B.2D=1/2*(sum(sum(C).(1/2)endW=(1./D)/(sum(1./D)一致性检验A=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.51CI=(Jmax-n)./(n-1)CR=CI./RI(1,n)自适应权重A=B=D1=R=0n,m=size(A)C=A.*BD=sum(C,2)D2=(sum(D-D1).2).(1/2)while(D20.001)for i=1:mF(:,i)=abs(D-A(:,i)end G=max(F,2)for i=1:mH(:,i)=G-0.2*F(:,i)end I=H.*BM=F.*BN=G-0.2*sum(M,2)for i=1:mW(:,i)=I(:,i)./NendB=WD1=
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2024年中考数学考前押题密卷(呼和浩特卷)(全解全析)
- 电子元件制造项目商业计划书
- 2024年3月份北京汽车市场分析
- 2024年册亨县《高等数学(一)》(专升本)巅峰冲刺试卷含解析
- 2024年二连浩特市《高等数学(一)》(专升本)高分冲刺试题含解析
- 2024年万源市《高等数学(一)》(专升本)最后冲刺试题含解析
- 证券账户承包投资协议-甲方:-乙方:-丽水市红领资产管理有限公司
- 环保主题班会教案18篇
- 课外活动(共10篇)
- 论校园暴力作文1000字
- 城市公共停车场规划与设计标准
- 抗菌药物临床应用处方权考试试题答案
- 老年人能力评估服务项目组织机构及人员配备
- 公安局犬粮项目质量控制方案
- 产后出血预防与处理指南(2023)解读
- 音乐的美及其鉴赏智慧树知到期末考试答案2024年
- 《新编秘书实务》教学大纲
- 大学生校纪校规安全教育
- 机房精密空调改造施工方案
- Web前端开发案例教程(HTML5+CSS3)(微课版)教学教案
- 航空材料课程标准
评论
0/150
提交评论