RTextureMetrics (version 1.1)

calcDIS: DIS Dissimilarity

Description

calculates DISSIMILARITY measure for Grey Level Co-occurrence Matrices

Usage

calcDIS(rawmat)

Arguments

rawmat

assigns the GLC-Matrix for DISSIMILARITY calculation

Value

• returns the DISSIMILARITY measure

Details

DISSIMILARITY measure belongs to the Contrast group of texture metrics. In the DISSIMILARITY measure weights increase linearly.

References

Toennies, D., 2005: Grundlagen der Bildverarbeitung, 341 S., Pearson Studium Harralick, R.M., Shanmugam, K., Dinstein, I., 1973: Textural Features for image classification. IEEE Transactions on Systems, Man and Cybernetics, SMC vol. 3 no. 6, pp. 610-620.

Examples

data<-c(0,0,1,1,0,0,1,1,0,2,2,2,2,2,3,3)
mat<-matrix(data, nrow=4, byrow=TRUE)
(mat)
GLCM<-genGLCM(2,1,mat)
(GLCM)
(calcDIS(GLCM))
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (rawmat) 
{
    size <- dim(rawmat)[1]
    matconweights <- matrix(0, nrow = size, ncol = size)
    for (i in 1:size) {
        for (a in 1:size) {
            matconweights[i, a] <- abs(a - i)
        }
    }
    dis <- rawmat * matconweights
    return(sum(dis))
  }