灰色系统关联度问题:
clc,clear
load x.txt %把原始数据存放在纯文本文件x.txt 中
for i=1:15
x(i,=x(i,/x(i,1); %标准化数据
end
for i=16:17
x(i,=x(i,1)./x(i,; %标准化数据
end
data=x;
n=size(data,1);
ck=data(1,;m1=size(ck,1);
bj=data(2:n,;m2=size(bj,1);
for i=1:m1
for j=1:m2
t(j,=bj(j,-ck(i,;
end
jc1=min(min(abs(t')));jc2=max(max(abs(t')));
rho=0.5;
ksi=(jc1+rho*jc2)./(abs(t)+rho*jc2);
rt=sum(ksi')/size(ksi,2);
r(i,=rt;
end
r
[rs,rind]=sort(r,'descend') %对关联度进行排序