업데이트 'step4_extract_image_statistics.m'

step4_extract_image_statistics.m

@@ -6,15 +6,19 @@ video_names = dir( [frame_directory 'sample*'] );
 % Enhancing figure visibility
 set(gcf, 'Position', [0 0 800 800], 'Color', [1 1 1] );
 
+% Save result
+csv_file_directory = 'data/result_csv/';
+if ~isdir(csv_file_directory), mkdir(csv_file_directory); end
+
 % Figure to video 
-output_video_option = 1;
+output_video_option = 0;
 if output_video_option
     output_video_directory = 'data/output/';
     if ~isdir(output_video_directory), mkdir(output_video_directory); end
 end
 
 % Main loop
-for videoIdx = 1:length( video_names )
+for videoIdx = 1%:length( video_names )
     frame_names = dir( [frame_directory video_names(videoIdx).name '/*.jpg']);
     mask_names = dir( [mask_directory video_names(videoIdx).name '/*.jpg']);
     
@@ -96,6 +100,10 @@ for videoIdx = 1:length( video_names )
         %% Etc.
         drawnow;
         
+        % Save coordinate data into *.csv format
+        csv_filename = [csv_file_directory 'result_' video_names(videoIdx).name '.csv'];
+        csvwrite( csv_filename, xy );
+        
         % Writing output video
         if output_video_option
             if frameIdx==1
@@ -110,5 +118,6 @@ for videoIdx = 1:length( video_names )
                 vid_obj.close();
             end
         end
+        
     end
 end