% author: M.M.Haji
% email : mehdi.haji@gmail.com
%
% discretize 10000 randomly selected instances of 'textdata.txt' that is
% generated by 'gen_text_data' script  and save the result in
% 'textdata.nominal.txt'

disp('read training data...');
D = textread('textdata.txt');

disp('select 10000 instances randomly...');
D = D(randperm(size(D,1)),:);
trset = D(1:10000,:);

outf = fopen('textdata.nominal.txt','w');
[nr nc] = size(trset); % nc == 19

disp('generating output file...');

for i1 = 1:nr

    % discretize f01:
    if trset(i1,1) <= -15.8
        fprintf(outf,'S2, ');
    elseif trset(i1,1) <= -0.7
        fprintf(outf,'S1, ');
    elseif trset(i1,1) <= 0.8
        fprintf(outf,'CE, ');
    elseif trset(i1,1) <= 16.1
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
        
    % discretize f02:
    if trset(i1,2) <= -13.1
        fprintf(outf,'S2, ');
    elseif trset(i1,2) <= -0.4
        fprintf(outf,'S1, ');
    elseif trset(i1,2) <= 0.3
        fprintf(outf,'CE, ');
    elseif trset(i1,2) <= 11.3
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f03:
    if trset(i1,3) <= -9.5
        fprintf(outf,'S2, ');
    elseif trset(i1,3) <= -0.3
        fprintf(outf,'S1, ');
    elseif trset(i1,3) <= 0.4
        fprintf(outf,'CE, ');
    elseif trset(i1,3) <= 11.4
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f04:
    if trset(i1,4) <= -11.5
        fprintf(outf,'S2, ');
    elseif trset(i1,4) <= -0.5
        fprintf(outf,'S1, ');
    elseif trset(i1,4) <= 0.4
        fprintf(outf,'CE, ');
    elseif trset(i1,4) <= 11.3
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end    
    
    % discretize f05:
    if trset(i1,5) <= -10
        fprintf(outf,'S2, ');
    elseif trset(i1,5) <= -0.3 
        fprintf(outf,'S1, ');
    elseif trset(i1,5) <= 0.2
        fprintf(outf,'CE, ');
    elseif trset(i1,5) <= 9.4
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f06:
    if trset(i1,6) <= -6.3
        fprintf(outf,'S2, ');
    elseif trset(i1,6) <= -0.3
        fprintf(outf,'S1, ');
    elseif trset(i1,6) <= 0.2
        fprintf(outf,'CE, ');
    elseif trset(i1,6) <= 6.6
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end

    % discretize f07:
    if trset(i1,7) <= -10.6
        fprintf(outf,'S2, ');
    elseif trset(i1,7) <= -0.4
        fprintf(outf,'S1, ');
    elseif trset(i1,7) <= 0.3
        fprintf(outf,'CE, ');
    elseif trset(i1,7) <= 8.5
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end    
    
    % discretize f08:
    if trset(i1,8) <= -7.3
        fprintf(outf,'S2, ');
    elseif trset(i1,8) <= -0.2
        fprintf(outf,'S1, ');
    elseif trset(i1,8) <= 0.2
        fprintf(outf,'CE, ');
    elseif trset(i1,8) <= 6.2
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f09:
    if trset(i1,9) <= -5.2
        fprintf(outf,'S2, ');
    elseif trset(i1,9) <= -.2
        fprintf(outf,'S1, ');
    elseif trset(i1,9) <= .2
        fprintf(outf,'CE, ');
    elseif trset(i1,9) <= 4.8
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f10:
    if trset(i1,10) <= -4.6
        fprintf(outf,'S2, ');
    elseif trset(i1,10) <= -.2
        fprintf(outf,'S1, ');
    elseif trset(i1,10) <= .2
        fprintf(outf,'CE, ');
    elseif trset(i1,10) <= 4.3
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f11:
    if trset(i1,11) <= -3.3
        fprintf(outf,'S2, ');
    elseif trset(i1,11) <= -.1
        fprintf(outf,'S1, ');
    elseif trset(i1,11) <= .2
        fprintf(outf,'CE, ');
    elseif trset(i1,11) <= 3.7
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f12:
    if trset(i1,12) <= -3.4
        fprintf(outf,'S2, ');
    elseif trset(i1,12) <= -.2
        fprintf(outf,'S1, ');
    elseif trset(i1,12) <= .2
        fprintf(outf,'CE, ');
    elseif trset(i1,12) <= 2.9
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f13:
    if trset(i1,13) <= -3.4
        fprintf(outf,'S2, ');
    elseif trset(i1,13) <= -.1
        fprintf(outf,'S1, ');
    elseif trset(i1,13) <= .1
        fprintf(outf,'CE, ');
    elseif trset(i1,13) <= 3.3
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f14:
    if trset(i1,14) <= -2
        fprintf(outf,'S2, ');
    elseif trset(i1,14) <= -.1
        fprintf(outf,'S1, ');
    elseif trset(i1,14) <= .1
        fprintf(outf,'CE, ');
    elseif trset(i1,14) <= 2
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f15:
    if trset(i1,15) <= -2
        fprintf(outf,'S2, ');
    elseif trset(i1,15) <= -.1
        fprintf(outf,'S1, ');
    elseif trset(i1,15) <= .1
        fprintf(outf,'CE, ');
    elseif trset(i1,15) <= 2
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f16:
    if trset(i1,16) <= -2
        fprintf(outf,'S2, ');
    elseif trset(i1,16) <= -.2
        fprintf(outf,'S1, ');
    elseif trset(i1,16) <= .2
        fprintf(outf,'CE, ');
    elseif trset(i1,16) <= 3
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f17:
    if trset(i1,17) <= -2.3
        fprintf(outf,'S2, ');
    elseif trset(i1,17) <= -.1
        fprintf(outf,'S1, ');
    elseif trset(i1,17) <= .1
        fprintf(outf,'CE, ');        
    elseif trset(i1,17) <= 2.4
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    % discretize f18:
    if trset(i1,18) <= -2.2
        fprintf(outf,'S2, ');
    elseif trset(i1,18) <= -.1
        fprintf(outf,'S1, ');
    elseif trset(i1,18) <= .2
        fprintf(outf,'CE, ');
    elseif trset(i1,18) <= 2.3
        fprintf(outf,'B1, ');
    else
        fprintf(outf,'B2, ');
    end
    
    if trset(i1,19) == 1
        fprintf(outf,'yes\r\n');
    else
        fprintf(outf,'no\r\n');
    end
    
end
    
fclose(outf);