forest_train训练文件的生成代码

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%forest_train pos
main_path = 'D:\\workspace\\xx\\机器学习训练框架\\hough_forests_db\\tougue\\';
main_path_1 = 'D:\\workspace\\xx\\机器学习训练框架\\hough_forests_db\\';
train_path = [main_path_1, 'train_pos.txt'];
fid=fopen(train_path,'w');
fclose(fid);
dat = dir( main_path );
icount = 0;
for j = 1 : length( dat )
    % If maindir(i) is not a dir, skip
    if( isequal( dat( j ).name, '.' )||...
        isequal( dat( j ).name, '..'))
        continue;
    end
    icount = icount + 1;
end
fid=fopen(train_path,'a+');
fprintf(fid,'%d 1\n',icount);
fclose(fid);
for j = 1 : length( dat )
    % If maindir(i) is not a dir, skip
    if( isequal( dat( j ).name, '.' )||...
        isequal( dat( j ).name, '..'))
        continue;
    end
    datapath = fullfile( main_path, dat( j ).name, '');
    ss = size(strfind(datapath, 'Thumbs.db', 'ForceCellOutput',false));
    if(ss(1) == 0)
        datapath = fullfile( main_path, dat( j ).name, '');
        if(1)
            img=imread(datapath);
            tt = (size(img));
            %tt(1) = 96;
            %tt(2) = 160;
            %img1 = imresize(img, [tt(1) tt(2)]);
        end
        %clear img;
        %imwrite(img1, datapath);
        fid=fopen(train_path,'a+');
        fprintf(fid,'%s 0 0 %d %d %d %d\n',dat( j ).name, tt(2), tt(1), floor(tt(1)/2), floor(tt(2)/2));
        fclose(fid);
    end
end
%neg
main_path = 'D:\\workspace\\xx\\机器学习训练框架\\hough_forests_db\\other\\';
train_path = [main_path_1, 'train_neg.txt'];
fid=fopen(train_path,'w');
fclose(fid);
dat = dir( main_path );
icount = 0;
for j = 1 : length( dat )
    % If maindir(i) is not a dir, skip
    if( isequal( dat( j ).name, '.' )||...
        isequal( dat( j ).name, '..'))
        continue;
    end
    icount = icount + 1;
end
fid=fopen(train_path,'a+');
fprintf(fid,'%d 1\n',icount);
fclose(fid);
for j = 1 : length( dat )
    % If maindir(i) is not a dir, skip
    if( isequal( dat( j ).name, '.' )||...
        isequal( dat( j ).name, '..'))
        continue;
    end
    datapath = fullfile( main_path, dat( j ).name, '');
    ss = size(strfind(datapath, 'Thumbs.db', 'ForceCellOutput',false));
    if(ss(1) == 0)
        datapath = fullfile( main_path, dat( j ).name, '');
        img=imread(datapath);
        tt = (size(img));
        fid=fopen(train_path,'a+');
        fprintf(fid,'%s 0 0 %d %d\n',dat( j ).name, tt(2), tt(1));
        fclose(fid);
    end
end