粗糙集约简 程序 matlab,粗糙集属性约简matlab程序

粗糙集-属性约简-matlab程序

Data2为条件属性， decision2为决策属性

%%%my_test函数实现

clc;

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%读取信息系统文件 file = textread('data2.txt','%s','delimiter','\n','whitespace',''); %读取文件信息，每一行为一个胞元

[m,n]=size(file); %胞元的大小

for i=1:m

words=strread(file{i},'%s','delimiter',' ');%读取每个胞元中字符，即分解胞元为新的胞元 words=words';%转置

X{i}=words;

end

X=X';

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

[B,num,AT]=my_reduct(X); %信息系统的约简

ind_AT=ind(X); %信息系统的不可等价关系

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%显示约简信息系统 disp('约简后的条件系统为：');

[m,n]=size(B);

for i=1:m

disp(B{i});

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%读取决策系统文件 file = textread('decision2.txt','%s','delimiter','\n','whitespace','');

[m,n]=size(file);

for i=1:m

words=strread(file{i},'%s','delimiter',' ');

words=words';

D{i}=words;

end

D=D';

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%决策系统的正域约简

X_D=X;

[l,k]=size(X_D{1});

pos_d=pos(X_D,D);%正域

for i=1:m %%%%%%%%%%%%%%正域有问