# NOT RUN {
# generate an image data matrix with range 0~255
set.seed(100)
m <- matrix(sample(0:255,64), nrow=8, ncol=8)
# calculate GLCM with defalut parameters
GLCM.m <- GLCM(m)
# calculate probability GLCM
GLCM.m.p <- GLCM(m,prob = TRUE)
# }
Run the code above in your browser using DataLab