gabor 提取纹理特征

gabor提取纹理特征有解释 很好用 可以运行

function gabor_k = compute（xyf0theta）
r = 1; g = 1;
x1 = x*cos（theta） + y*sin（theta）;
y1 = -x*sin（theta） + y*cos（theta）;
gabor_k = f0^2/（pi*r*g）*exp（-（f0^2*x1^2/r^2+f0^2*y1^2/g^2））*exp（i*2*pi*f0*x1）; 

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2007-11-26 17:05  Gabor\
     文件         207  2007-10-27 14:44  Gabor\compute.m
     文件         707  2007-11-26 14:52  Gabor\gabor.m
     文件         494  2007-10-27 14:57  Gabor\Gabor1.m
     文件         497  2007-11-26 14:50  Gabor\Gabor2.m
     目录           0  2007-11-26 17:05  Gabor\pic\
     文件       66614  2006-08-29 09:59  Gabor\pic\lena.bmp
     文件       19456  2007-11-26 14:50  Gabor\pic\Thumbs.db
     文件         221  2007-11-26 14:56  Gabor\read me.txt