文档介绍：粗糙集 属性约简题目: SARS诊断注:这是我学粗糙集时老师给的作业 U干咳呼吸困难 血液检测高烧38度 X射线浓痰血细胞多寒战肌肉酸痛乏力胸膜痛头痛非典111 1100001101120 0 00000000000310 1000000100040 0 01********** 0 011********** 011********** 001********** 11000011011910 11100011011101 1 11000011011111 0 11100011011121 0 **********属性约简的顺序如下:求正域、生成未经处理的区分矩阵、对区分矩阵进行化简、求核、对已经处理过的区分矩阵进行属性约简。约简后的决策表有26行,所有12个属性都是正域中的属性,核为空 程序:%;a=[1,1,1,1,0,0,0,0,1,1,0,1;   0,0,0,0,0,0,0,0,0,0,0,0;   1,0,1,0,0,0,0,0,0,1,0,0;   0,0,0,1,1,1,1,0,1,0,1,1;   1,0,0,1,1,1,1,1,0,1,1,0;   0,1,0,1,1,1,1,1,1,0,0,1;   1,0,0,0,1,1,1,0,0,1,1,1;   1,1,1,1,0,0,0,0,1,1,0,1;   1,0,1,1,1,0,0,0,1,1,0,1;   1,1,1,1,0,0,0,0,1,1,0,1;   1,0,1,1,1,0,0,0,1,1,0,1;   1,0,1,1,1,0,0,0,1,1,0,1];d=[1;0;0;0;0;0;0;1;1;1;1;1];pos=posCD(a,d);dismat=dismatrix(a,d,pos);dism=disbe(dismat);core=cor(dism);[red,row]=redu(dism);time=toc%%生成未经处理的区分矩阵dismatfunctiondismat=dismatrix(a,d,pos)[m,n]=size(a);p=1;index1=0;index2=0;index=0;dis=-1*ones(m*(m-1)/2,n);fori=1:m   forj=i+1:m       if(isxbelongtopos(i,pos)&~isxbelongtopos(j,pos))...               |(~isxbelongtopos(i,pos)&isxbelongtopos(j,pos))...               |(isxbelongtopos(i,pos)&isxbelongtopos(j,pos)&~isxybelongtoindD(i,j,d))           index2=1;       end       ifindex2==0           continue;       end       fork=1:n           ifa(i,k)~=a(j,k)               dis(p,k)=1;               index1=1;           elsedis(p,k)=0;           end