灰度共生矩阵提取纹理特征

%**************************************************************************
%                   图像检索——纹理特征
%基于共生矩阵纹理特征提取，d=1θ=0°45°90°135°共四个矩阵
%所用图像灰度级均为256
%参考《基于颜色空间和纹理特征的图像检索》
%function : T=Texture（Image） 
%Image    : 输入图像数据
%T        : 返回八维纹理特征行向量
%**************************************************************************
function T = Texture（Image）
Image = imread（‘E:\图片\image1.bmp‘）;
[MNO] = size（Image）;
%M = 256; 
%N = 256;

%--------------------------------------------------------------------------
%1.将各颜色分量转化为灰度
%--------------------------------------------------------------------------
Gray = double（0.3*Image（::1）+0.59*Image（::2）+0.11*Image（::3））;

%--------------------------------------------------------------------------
%2.为了减少计算量，对原始图像灰度级压缩，将G