从矩阵计算Haralick纹理特征

Question

我有这个标准化的灰度共生矩阵（GLCM）

d <- matrix(c(0,0,0,0,0,0,0,0,0,0,
          0,0.093654267,0.0253829322,0.0021881838,0.0013129103,0,0,0,0,0,
          0,0.025382932,0.2717724289,0.0494529540,0.0070021882,0.001312910,0.0008752735,0,0,0,
          0,0.002188184,0.0494529540,0.0910284464,0.0363238512,0.009628009,0.0004376368,0,0.0004376368,0,
          0,0.001312910,0.0070021882,0.0363238512,0.0586433260,0.031947484,0.0070021882,0.003063457,0.0008752735,0,
          0,0,0.0013129103,0.0096280088,0.0319474836,0.029759300,0.0188183807,0.006126915,0.0013129103,0,
          0,0,0.0008752735,0.0004376368,0.0070021882,0.018818381,0.0078774617,0.006126915,0.0030634573,0,
          0,0,0,0,0.0030634573,0.006126915,0.0061269147,0.007877462,0.0035010941,0,
          0,0,0,0.0004376368,0.0008752735,0.001312910,0.0030634573,0.003501094,0.00700218820,0,
          0,0,0,0,0,0,0,0,0,0), 10,10,byrow = TRUE)

我想在Haralick之后计算不同的纹理特征：Haralick et al. 1973, p. 619 (PDF warning)

我如何计算例如ASM

其中p(i,j)是归一化灰色空间依赖矩阵中的（i，j，） th 条目？