function?G?=?createGabor（or?n）
%
%?G?=?createGabor（numberOfOrientationsPerScale?n）;
%
%?Precomputes?filter?transfer?functions.?All?computations?are?done?on?the
%?Fourier?domain.?
%
%?If?you?call?this?function?without?output?arguments?it?will?show?the
%?tiling?of?the?Fourier?domain.
%
%?Input
%?????numberOfOrientationsPerScale?=?vector?that?contains?the?number?of
%????????????????????????????????orientations?at?each?scale?（from?HF?to?BF）
%?????n?=?imagesize?=?[nrows?ncols]?
%
%?output
%?????G?=?transfer?functions?for?a?jet?of?gabor?filters


Nscales?=?length（or）;
Nfilters?=?sum（or）;

if?length（n）?==?1
????n?=?[n（1）?n（1）];
end

l=0;
for?i=1:Nscales
????for?j=1:or（i）
????????l=l+1;
????????param（l:）=[.35?.3/（1.85^（i-1））?16*or（i）^2/32^2?pi/（or（i））*（j-1）];
????end
end

%?Frequencies:
%[fx?fy]?=?meshgrid（-n/2:n/2-1）;
[fx?fy]?=?meshgrid（-n（2）/2:n（2）/2-1?-n（1）/2:n（1）/2-1）;
fr?=?fftshift（sqrt（fx.^2+fy.^2））;
t?=?fftshift（angle（fx+sqrt（-1）*fy））;

%?Transfer?functions:
G=zeros（[n（1）?n（2）?Nfilters]）;
for?i=1:Nfilters
????tr=t+param（i4）;?
????tr=tr+2*pi*（tr<-pi）-2*pi*（tr>pi）;

????G（::i）=exp（-10*param（i1）*（fr/n（2）/param（i2）-1）.^2-2*param（i3）*pi*tr.^2）;
end


if?nargout?==?0
????figure
????for?i=1:Nfilters
????????contour（fx?fy?fftshift（G（::i））[1?.7?.6]‘r‘）;
????????hold?on
????end
????axis（‘on‘）;
????axis（‘equal‘）;
????axis（[-n（2）/2?n（2）/2?-n（1）/2?n（1）/2]）;
????axis（‘ij‘）;
????xlabel（‘f_x?（cycles?per?image）‘）;
????ylabel（‘f_y?（cycles?per?image）‘）;
????grid?on;
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????1952561??2011-11-26?15:20??CBIR\CBIR\distrib\CBIR.exe

?????文件???????1005??2011-11-26?15:20??CBIR\CBIR\distrib\readme.txt

?????文件????1952561??2011-11-26?15:20??CBIR\CBIR\src\CBIR.exe

?????文件?????575242??2011-11-26?15:20??CBIR\CBIR\src\mccExcludedFiles.log

?????文件???????1005??2011-11-26?15:20??CBIR\CBIR\src\readme.txt

?????文件??????52611??2011-11-26?15:19??CBIR\CBIR.prj

?????文件???????1494??2011-11-26?14:35??CBIR\createGabor.m

?????文件???????1048??2011-11-24?13:27??CBIR\DWT2_3layers.m

?????文件???????2003??2011-11-26?14:03??CBIR\HSV_feature.m

?????文件???????7303??2011-11-25?14:42??CBIR\image1.jpg

?????文件???????7396??2011-11-25?14:42??CBIR\image2.jpg

?????文件????????522??2009-11-21?02:21??CBIR\imresizecrop.m

?????文件???????6327??2011-11-26?14:35??CBIR\LMgist.m

?????文件????????320??2011-11-26?14:04??CBIR\load_image.m

?????文件????????454??2011-11-26?14:31??CBIR\main.m

?????文件????????195??2007-08-18?10:35??CBIR\RGB_to_YUV.m

?????文件??????????8??2011-11-26?14:36??CBIR\score.txt

?????文件????????562??2011-11-26?14:31??CBIR\search_GIST.m

?????文件????????329??2011-11-26?14:31??CBIR\search_HSV.m

?????文件????????461??2011-11-26?14:32??CBIR\search_YUV.m

?????目錄??????????0??2011-12-16?20:18??CBIR\CBIR\distrib

?????目錄??????????0??2011-12-16?20:18??CBIR\CBIR\src

?????目錄??????????0??2011-12-16?20:18??CBIR\CBIR

?????目錄??????????0??2011-12-16?20:18??CBIR

-----------?---------??----------?-----??----

??????????????4563407????????????????????24