x(1,：)=[83 0.191 12.9 7.2 89。4 0.432 6.33]；x(2,:）=[75 0。189 11。6 9。1 82.3 0。453 5.87];x（3,：）=［64 0。165 11.9 10.3 69。3 0.512 6.31］; %列出各数值，可修改x(4,：）=［63 0.165 12.8 9.7 68。2 0.455 6.6］；x(5，:)=［56 0.211 13。2 12。6 77。5 0.317 7.12］;m=5;n=7;x0=[83 0.211 13.2 7。2 89.4 0。317 5。87］； ％参考序列for i=1:navg(i)=0； ％均值初始化endfor i=1：m for j=1：navg（j)=avg(j)+x(i，j）; endend %求均值序列for i=1：navg(i)=avg(i)/m;endfor j=1:m for i=1:n x（j,i）=x(j,i)/avg（i）; %均值化 endendfor i=1:nx0(i)=x0(i)/avg(i）; %参考序列均值化endfor j=1:m for i=1:n delta（j，i）=abs(x(j，i)—x0（i）)； %求序列差 endendmax=delta（1，1);for j=1：m for i=1:n if delta（j，i）〉max max=delta（j,i）; end endend ％求两极差min=0;for j=1:m xgd（j）=0; for i=1：n glxs(j，i)=0.5＊max/（0.5*max+delta(j，i)); ％计算关联系数及相关度 xgd(j）=xgd（j)+glxs(j,i）； end xgd（j)=xgd(j)/n；endxgd％因此,A-E 区与参考序列（最佳指标）的相关度分别为 0.8489 0.6983 0.5588 0.5858 0。7105
