# S4 method for glcm
image(x, xlab = "Grey Level", ylab = "Grey Level",
col = colscale(length(unique(c(x@.Data)))))# S4 method for glrlm
image(x, xlab = "Grey Level", ylab = "Run Length",
col = colscale(length(unique(c(x@.Data)))))
# S4 method for glszm
image(x, xlab = "Grey Level", ylab = "Zone Size",
col = colscale(length(unique(c(x@.Data)))))
# S4 method for mglszm
image(x, xlab = "Grey Level", ylab = "Zone Size",
col = colscale(length(unique(c(x@.Data)))))