注：在我的資源中有改進過的cvgabor類

它有如下的功能：

生成特定方向和尺度的gabor

生成可以顯示或者儲存的gabor核的實部，虛部

影象的實部，虛部或者主要（Magnitude）響應

響應可以儲存在XML檔案中

#include "cvgabor.h"   
int main(){  
  
    //建立一個方向是PI/4而尺度是3的gabor   
    double Sigma = 2*PI;    
    double F = sqrt(2.0);    
    CvGabor *gabor1 = new CvGabor;    
    gabor1->Init(PI/4, 3, Sigma, F);  
      
    //獲得實部並顯示它   
    IplImage *kernel = cvCreateImage( cvSize(gabor1->get_mask_width(), gabor1->get_mask_width()), IPL_DEPTH_8U, 1);  
    kernel = gabor1->get_image(CV_GABOR_REAL);  
    cvNamedWindow("Gabor Kernel", 1);  
    cvShowImage("Gabor Kernel", kernel);  
    cvWaitKey(0);  
  
    //載入一個影象並顯示   
    IplImage *img = cvLoadImage( "D:/Demo.jpg", CV_LOAD_IMAGE_GRAYSCALE );  
    cvNamedWindow("Original Image", 1);  
    cvShowImage("Original Image", img);  
    cvWaitKey(0);  
  
    //獲取載入影象的gabor濾波響應的實部並且顯示   
    IplImage *reimg = cvCreateImage(cvSize(img->width,img->height), IPL_DEPTH_8U, 1);  
    gabor1->conv_img(img, reimg, CV_GABOR_REAL);  
    cvNamedWindow("Real Response", 1);  
    cvShowImage("Real Response",reimg);  
    cvWaitKey(0);  
    cvDestroyWindow("Real Response");  
  
    //獲取載入影象的gabor濾波響應的虛部並且顯示   
//  IplImage *reimg = cvCreateImage(cvSize(img->width,img->height), IPL_DEPTH_8U, 1);   
    gabor1->conv_img(img, reimg, CV_GABOR_IMAG);  
    cvNamedWindow("Imaginary Response", 1);  
    cvShowImage("Imaginary Response",reimg);  
    cvWaitKey(0);  
    cvDestroyWindow("Imaginary Response");  
  
    //獲取載入影象的gabor濾波響應的模並且顯示   
//  IplImage *reimg = cvCreateImage(cvSize(img->width,img->height), IPL_DEPTH_8U, 1);   
    gabor1->conv_img(img, reimg, CV_GABOR_MAG);  
    cvNamedWindow("Magnitude Response", 1);  
    cvShowImage("Magnitude Response",reimg);  
    cvWaitKey(0);  
    cvDestroyWindow("Magnitude Response");  
  
    /* 
    //這個響應可以被取樣為8位的灰度圖。如果你要原始的浮點型別的資料，你可以這樣做 
    IplImage *reimg = cvCreateImage(cvSize(img->width,img->height), IPL_DEPTH_32F, 1); 
    gabor1->conv_img(img, reimg, CV_GABOR_MAG); 
    //然而，這些浮點資料是不能夠以上面灰度圖的形式簡單的顯示，但是它可以被儲存在一個XML檔案中。 
    cvSave( "reimg.xml", (IplImage*)reimg, NULL, NULL, cvAttrList(0,0)); 
    */  
}