fasterize update

USEPA · Aug 9, 2024 · 8873c45 · 8873c45
1 parent 574bdc6
commit 8873c45
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -36,5 +36,6 @@ Imports:
     sp,
     sf,
     geosphere,
-    cluster
+    cluster,
+    fasterize
 RoxygenNote: 7.2.3
diff --git a/NEWS.md b/NEWS.md
@@ -3,6 +3,9 @@ lakemorpho 1.3.3 (2024-XX-xx)
 ## Bug Fixes
 - Bug on very skinny polys for lakeMajorAxis and lakeMinorAxis.  Checks for matrix and returns NA if not.
 
+## Updates
+- Added fasterize for rasterizing lakes
+
 lakemorpho 1.3.2 (2023-09-15)
 ==========================
 

diff --git a/R/lakeSurroundTopo.R b/R/lakeSurroundTopo.R
@@ -58,7 +58,7 @@ lakeSurroundTopo <- function(inLake, inElev = NULL, inCatch = NULL,
   ymax <- extent(tmpBuff)@ymax
   xmin <- extent(tmpBuff)@xmin
   ymin <- extent(tmpBuff)@ymin
-  lakepr <- rasterize(inLake, raster(xmn = xmin, xmx = xmax, ymn = ymin, ymx = ymax,
+  lakepr <- fasterize::fasterize(inLake, raster(xmn = xmin, xmx = xmax, ymn = ymin, ymx = ymax,
       nrows = nr, ncols = nc, crs = CRS(sf::st_crs(inLake)$wkt)))
   lakepr2 <- lakepr
   lakepr2[is.na(lakepr2)] <- 0