Add examples

[rhijmans]

The help files do not have examples. ?glcm_textures could have something like this:

r<- rast(volcano, extent= ext(2667400, 2667400 + ncol(volcano)*10, 6478700, 6478700 + nrow(volcano)*10), crs = "EPSG:27200") 
rq <- quantize_raster(r = r, n_levels = 16, method = "equal prob")
txt <- glcm_textures(rq, w = c(3,5), n_levels = 16, quantization = "none", shift = c(1,0))
plot(txt)

[ailich]

Thanks for the suggestion. Added examples to both glcm_textures and quantize_raster. I will add some examples to the other functions too, but those are the "main" two functions.

[rhijmans]

This example fails:

library(GLCMTextures)
r <- rast(volcano, extent= ext(2667400, 2667400 + ncol(volcano)*10, 6478700, 6478700 + nrow(volcano)*10), crs = "EPSG:27200")
#Error in rast(volcano, extent = ext(2667400, 2667400 + ncol(volcano) *  : 
#  could not find function "rast"

I think because terra is in "Imported" but not in "Depends"

you could change that, or add library(terra) to the example.

[ailich]

Thanks, I added library(terra) to the examples that need it and added examples for the other functions as well.