Home > analysis > WBCcropSample.m

WBCcropSample

PURPOSE ^

% SETUP

SYNOPSIS ^

function WBCcropSample()

DESCRIPTION ^

% SETUP

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function WBCcropSample()
0002 
0003 %% SETUP
0004 clc;
0005 load _param/_wbc;
0006 FN = wbc.experiment(1).FN;
0007 FP = wbc.experiment(1).FP;
0008 TP = wbc.experiment(1).TP;
0009 
0010 P = initParam('wbc');
0011 for seq = 1: length(P.IFOLDERS)
0012     fprintf('\nCropping samples at sequence %s', P.IFOLDERS(seq).Name);
0013     for subSeq = 1: size(P.IFOLDERS(seq).Ra,1)
0014         frStart = P.IFOLDERS(seq).Ra(subSeq,1);
0015         frEnd   = P.IFOLDERS(seq).Ra(subSeq,2);
0016         for fr = frStart: frEnd
0017             % Get big image
0018             visName = strcat(P.IFOLDERS(seq).Name,'/VIS/VIS_',...
0019                 P.IFOLDERS(seq).Name,num2str(fr),'.png');
0020             im = imread(visName);
0021             
0022 %             % Get FN crop image
0023 %             fnFrame = FN(FN(:,1)==seq & FN(:,2)==fr , :);
0024 %             for pos = 1: size(fnFrame,1)
0025 %                 col = fnFrame(pos,4) - (P.DIMENSION+20)/2;
0026 %                 row = fnFrame(pos,5) - (P.DIMENSION+20)/2;
0027 %                 cropIm = imcrop(im, [col row P.DIMENSION+20 P.DIMENSION+20] );
0028 %
0029 %                 cropName = strcat('_sample/FN/FN_', num2str(fnFrame(pos,3)), '.png');
0030 %                 imwrite(cropIm, cropName);
0031 %             end
0032 %
0033 %             % Get FP crop image
0034 %             fpFrame = FP(FP(:,1)==seq & FP(:,2)==fr , :);
0035 %             for pos = 1: size(fpFrame,1)
0036 %                 col = fpFrame(pos,4) - (P.DIMENSION+20)/2;
0037 %                 row = fpFrame(pos,5) - (P.DIMENSION+20)/2;
0038 %                 cropIm = imcrop(im, [col row P.DIMENSION+20 P.DIMENSION+20] );
0039 %
0040 %                 cropName = strcat('_sample/FP/FP_', num2str(fpFrame(pos,3)), '.png' );
0041 %                 imwrite(cropIm, cropName);
0042 %             end
0043             
0044             % Get TP crop image
0045             tpFrame = TP(TP(:,1)==seq & TP(:,2)==fr , :);
0046             for pos = 1: size(tpFrame,1)
0047                 col = tpFrame(pos,4) - (P.DIMENSION+20)/2;
0048                 row = tpFrame(pos,5) - (P.DIMENSION+20)/2;
0049                 cropIm = imcrop(im, [col row P.DIMENSION+20 P.DIMENSION+20] );
0050                 
0051                 cropName = strcat('_sample/TP/TP_', num2str(tpFrame(pos,3)), '.png' );
0052                 imwrite(cropIm, cropName);
0053             end
0054             
0055         end
0056     end
0057 end

Generated on Thu 17-Mar-2011 14:45:51 by m2html © 2005