Edit pixelate and update pkgdown site

lydialucchesi · Mar 19, 2024 · 743173b · 743173b
1 parent a4d3725
commit 743173b
Show file tree

Hide file tree

Showing 16 changed files with 82 additions and 102 deletions.
diff --git a/R/pixelate.R b/R/pixelate.R
@@ -50,7 +50,7 @@ pixelate <-
     # define a function that finds the pixels inside each region
     pixel_poly <- function(x) {
       grid <- st_intersection(full_grid, st_as_sf(geoData[x,]))
-      grid <- st_cast(grid, "POLYGON")
+      grid <- suppressWarnings(st_cast(grid, "POLYGON"))
       grid <- as_Spatial(grid)
       grid$ID <- rep(geoData[x, id][[1]], length(grid))
       return(grid)

diff --git a/docs/LICENSE.html b/docs/LICENSE.html