0001
0002
0003 clear all; close all;
0004 disp('===============> Learning the active basis model from positive training images');
0005
0006 load ../template_params
0007
0008
0009 numImage = 1;
0010 I = cell(numImage, 1);
0011 sizex = 63; sizey = 63;
0012 center = 32; a = 22; b = 10;
0013 I0 = single(zeros(sizex, sizey));
0014 for x = 1:sizex
0015 for y = 1:sizey
0016 if (((x-center)/a)^2+((y-center)/b)^2<1.)
0017 I0(x, y) = single(1.);
0018 end
0019 end
0020 end
0021 I{1} = I0+0.;
0022
0023 allSizex = zeros(1, numImage, 'single')+sizex;
0024 allSizey = zeros(1, numImage, 'single')+sizey;
0025
0026
0027
0028
0029 s = 4;
0030 storeName = ['../result/naturalStat' num2str(s-1)];
0031 load(storeName);
0032 numElement = 14;
0033 halfFilterSize = ( size(GaborFilter{(s-1)*nGaborOri+1},1) - 1 ) / 2;
0034 disp(['start filtering training images at Gabor length ' num2str(2*halfFilterSize+1)]); tic
0035
0036 selectedOrient = zeros(numElement, 1, 'single');
0037 selectedx = zeros(numElement, 1, 'single');
0038 selectedy = zeros(numElement, 1, 'single');
0039 selectedlambda = zeros(numElement, 1, 'single');
0040 selectedLogZ = zeros(numElement, 1, 'single');
0041 symbolicTemplate = zeros(sizex, sizey, 'single');
0042
0043
0044
0045 SUM1map = ApplyfilterfftsameLocalNormPerOri(I, GaborFilter((s-1)*nGaborOri+(1:nGaborOri)));
0046 disp(['filtering time: ' num2str(toc) ' seconds']);
0047
0048
0049 locationShiftLimit = 0;
0050 orientShiftLimit = 0;
0051 Csigmoid(numImage, allSizex, allSizey, nGaborOri, GaborSaturation, SUM1map);
0052 MAX1map = cell(numImage, nGaborOri);
0053 subsampleM1 = 1;
0054 trackMap = cell(numImage, nGaborOri);
0055 for img = 1:numImage
0056 for orient = 1:nGaborOri
0057 MAX1map{img, orient} = single(zeros(floor(sizex/subsampleM1), floor(sizey/subsampleM1)));
0058 trackMap{img, orient} = single(zeros(floor(sizex/subsampleM1), floor(sizey/subsampleM1)));
0059 end
0060 end
0061 disp(['start maxing training images at Gabor length ' num2str(2*halfFilterSize+1)]); tic
0062 CgetMAX1track(numImage, allSizex, allSizey, nGaborOri, locationShiftLimit, orientShiftLimit, subsampleM1, ...
0063 SUM1map, MAX1map, trackMap);
0064 disp(['maxing time: ' num2str(toc) ' seconds']);
0065
0066
0067
0068 learningSampleSize = 1;
0069 deformedTemplate = cell(1, learningSampleSize);
0070 for img = 1 : learningSampleSize
0071 deformedTemplate{img} = single(zeros(sizex, sizey));
0072 end
0073 SUM2score = zeros(learningSampleSize, 1);
0074 disp(['start mex-C learning of template at Gabor length ' num2str(2*halfFilterSize+1)]); tic
0075 CsharedSketch(nGaborOri, locationShiftLimit, orientShiftLimit, GaborSaturation, subsampleM1, ...
0076 numElement, learningSampleSize, sizex, sizey, ...
0077 SUM1map, MAX1map, trackMap, ...
0078 halfFilterSize, CorrGabor((s-1)*nGaborOri + (1:nGaborOri), (s-1)*nGaborOri + (1:nGaborOri)),...
0079 GaborSymbol( (s-1)*nGaborOri + (1:nGaborOri) ), ...
0080 numStoredPoint, (storedLambda), (storedExpectation), (storedLogZ), ...
0081 selectedOrient, selectedx, selectedy, selectedlambda, selectedLogZ, SUM2score, ...
0082 symbolicTemplate, deformedTemplate);
0083
0084 selectedScale = ones(numElement,1)*(s-1);
0085
0086
0087
0088
0089
0090
0091
0092 disp(['mex-C learning time: ' num2str(toc) ' seconds']);
0093 templateName = ['../result/learnedEllipsoidTemplate' num2str(s-1)];
0094 save(templateName, 'numElement', 'selectedOrient', 'selectedx', 'selectedy', 'selectedScale', 'selectedlambda', 'selectedLogZ', ...
0095 'sizex', 'sizey', 'symbolicTemplate', 'subsampleM1');
0096