0001 function bg = WBCbg(iFiles)
0002
0003 nFiles = length(iFiles);
0004 midFile = round(nFiles/2);
0005 count =0;
0006 temp = imread(iFiles(1).name);
0007 [R C] = size(temp);
0008
0009 im_cube = zeros(R,C,10);
0010 disp('Reading images...');
0011 for i=1 : 10
0012 count = count +1;
0013 im_cube(:,:,count) = imread(iFiles(i).name);
0014 end
0015
0016
0017
0018
0019
0020
0021
0022
0023
0024 disp('Computing bg...');
0025 bg = median(im_cube,3);
0026
0027
0028 imOut = '../BG.png';
0029 bg = bg/ max(bg(:));
0030 imwrite(bg, imOut);
0031 disp('Computing bg...Done');
0032
0033 end