Accept grd/gri files as a valid raster format.

DESCRIPTION

 Package: mapMCDA
 Title: Produce an epidemiological risk map by weighting multiple risk
         factors
-Version: 0.4.42
+Version: 0.4.43
 Date: 2020-04-24
 Authors@R: c( person("Andrea", "Apolloni", email =
         "andrea.apolloni@cirad.fr", role = c("ctb"), comment = "Animal

R/layer_type.R

@@ -13,7 +13,7 @@ layer_type <- function(x) {
   
   known_extensions <- list(
     vector  = c("\\.gpkg$", "\\.shp$"),
-    raster  = c("\\.tif$", "\\.tiff$"),
+    raster  = c("\\.tif$", "\\.tiff$", "\\.grd$", "\\.gri"),
     network = c("\\.csv$")
   )