求取灰度共生矩阵参数（能量、熵、惯性矩、相关性）的Matlab源程序

通过该Matlab程序可以求取用于描述图像纹理特征的灰度共生矩阵参数（能量、熵、惯性矩、相关性）。可以分别求取0,45°,90°,135°方向上的特征参数，同时可以求出这些特征参数的平均值与标准差。

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

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

%--------------------------------------------------------------------------
%2.为了减少计算量，对原始图像灰度级压缩，将Gray量化成16级
%--------------------------------------------------------------------------
for i = 1:M
      for j = 1:N
             for n = 1:256/16
                   if （n-1）*16<=Gray（ij