include shapefile validity test

BrunoVilela · Nov 15, 2023 · 3614db9 · 3614db9
1 parent 0054d8b
commit 3614db9
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 0 deletions.
diff --git a/R/defensive_functions.R b/R/defensive_functions.R
@@ -11,6 +11,9 @@
   if (!terra_check) {
     stop("all shapefiles provided should be a SpatVector object.")
   }
+  if (!terra::is.valid(shape)) {
+    shape <- terra::makeValid(shape)
+  }
   return(shape)
 }
 

diff --git a/tests/testthat/Rplots.pdf b/tests/testthat/Rplots.pdf
diff --git a/tests/testthat/Rplots6.pdf b/tests/testthat/Rplots6.pdf