txttomt01.m

基于粗糙集的知识约简算法和采用回归进行的知识约简表示

function mtdata=txttomt01(filename,num)
%TXTTOMT 文本转矩阵

for i=1:num
mtdata(1,i)=i;
end

fid=fopen(filename,'rt');
if fid == -1 
('Error opening the file') 
end 
k=1;
while 1
    k=k+1;
    nextline=fgetl(fid);
        
    if ~isstr(nextline)
        break;%读到最后跳出
    end   
    
 %   disp(nextline)
    temp=sscanf(nextline,'%d');
    [c,r]=size(temp);
    for j=1:(c-1)
        mtdata(k,temp(j,1))=1;
    end 
end