Home > analysis > detectionEvaluationAfterTracking.m

detectionEvaluationAfterTracking

PURPOSE ^

SYNOPSIS ^

This is a script file.

DESCRIPTION ^

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 load _report
0002 load _iFolders
0003 load _parameters
0004 clc
0005 %% ALL DATA
0006 dataSpecs = zeros(length(iFolders),7);
0007 % loop through data set
0008 for i = 1 : length(iFolders)
0009     % loop through each frame
0010     nFrames = unique(SS(i).Rich.tracks(:,2));
0011     specs = zeros(0,7);
0012     for fr = 1  :size(nFrames,1)
0013         frame = nFrames(fr);
0014         pos_M = SS(i).Rich.tracks( SS(i).Rich.tracks(:,2) == frame,3:4 );
0015         pos_GT= SS(i).Rich.tracksGT( SS(i).Rich.tracksGT(:,2) == frame, 3:4 );
0016         
0017         [TPR PPV FDR TP FP FN] = NKTspecs(pos_M,pos_GT,P.tEval_RMSE);
0018         specs(end+1,:) = [fr TPR PPV FDR TP FP FN];    
0019     end
0020     dataSpecs(i,:) = mean(specs);
0021 end
0022 
0023 TPR_all = mean(dataSpecs(:,2))
0024 FDR_all = mean(dataSpecs(:,4))
0025 FP_all  = mean(dataSpecs(:,6))
0026 
0027 %% COLLISION
0028 dataSpecs_CC = zeros(length(iFolders),7);
0029 % loop through data set
0030 for i = 1 : length(iFolders)
0031     % loop through each frame
0032     nFrames = unique(SS(i).Rich.CC.tracks(:,2));
0033     specs = zeros(0,7);
0034     for fr = 1  :size(nFrames,1)
0035         frame = nFrames(fr);
0036         pos_M = SS(i).Rich.CC.tracks( SS(i).Rich.CC.tracks(:,2) == frame,3:4 );
0037         pos_GT= SS(i).Rich.CC.tracksGT( SS(i).Rich.CC.tracksGT(:,2) == frame, 3:4 );
0038         
0039         [TPR PPV FDR TP FP FN] = NKTspecs(pos_M,pos_GT,P.tEval_RMSE);
0040         specs(end+1,:) = [fr TPR PPV FDR TP FP FN];    
0041     end
0042     dataSpecs_CC(i,:) = mean(specs);
0043 end
0044 
0045 TPR_CC = mean(dataSpecs_CC(:,2))
0046 FDR_CC = mean(dataSpecs_CC(:,4))
0047 
0048 %% NON-COLLISION
0049 dataSpecs_NC = zeros(length(iFolders),7);
0050 % loop through data set
0051 for i = 1 : length(iFolders)
0052     % loop through each frame
0053     nFrames = unique(SS(i).Rich.NC.tracks(:,2));
0054     specs = zeros(0,7);
0055     for fr = 1  :size(nFrames,1)
0056         frame = nFrames(fr);
0057         pos_M = SS(i).Rich.NC.tracks( SS(i).Rich.NC.tracks(:,2) == frame,3:4 );
0058         pos_GT= SS(i).Rich.NC.tracksGT( SS(i).Rich.NC.tracksGT(:,2) == frame, 3:4 );
0059         
0060         [TPR PPV FDR TP FP FN] = NKTspecs(pos_M,pos_GT,P.tEval_RMSE);
0061         specs(end+1,:) = [fr TPR PPV FDR TP FP FN];    
0062     end
0063     dataSpecs_NC(i,:) = mean(specs);
0064 end
0065 
0066 TPR_NC = mean(dataSpecs_NC(:,2))
0067 FDR_NC = mean(dataSpecs_NC(:,4))

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