m

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: terra
 Type: Package
 Title: Spatial Data Analysis
-Version: 1.8-14
+Version: 1.8-15
 Date: 2025-01-23
 Depends: R (>= 3.5.0)
 Suggests: parallel, tinytest, ncdf4, sf (>= 0.9-8), deldir, XML, leaflet (>= 2.2.1), htmlwidgets

NEWS.md

@@ -1,4 +1,4 @@
-# version 1.8-14
+# version 1.8-15
 
 ## bug fixes
 
@@ -134,7 +134,7 @@ Released 2024-10-14
 
 ## new 
 
-- `map-region` returns the coordinates of the axes position of a map created with `plot<Spat*>` [#1517](https://github.com/rspatial/terra/issues/1517) by Daniel Schuch
+- `map_extent` returns the coordinates of the axes position of a map created with `plot<Spat*>` [#1517](https://github.com/rspatial/terra/issues/1517) by Daniel Schuch
 - `polys<leaflet>` method [#1543](https://github.com/rspatial/terra/issues/1543) by Márcia Barbosa
 - `plot<SpatVectorCollection>` method [#1532](https://github.com/rspatial/terra/issues/1532) by jedgroev
 - `add_mtext` to add text around the margins of a map. [#1567](https://github.com/rspatial/terra/issues/1567) by Daniel Schuch

R/divide.R

@@ -170,7 +170,7 @@ strip_polygon <- function(x, vertical, horizontal) {
 		})
 		xbnds <- matrix(c(ex$xmin, rep(edges,rep(2,length(edges))), ex$xmax), ncol=2, byrow=TRUE)
 		xbnds <- cbind(xbnds, ex$ymin, ex$ymax)
-		xbnds <- do.call(rbind, apply(xbnds, 1, \(i) as.polygons(ext(i))))
+		xbnds <- do.call(rbind, apply(xbnds, 1, function(i) as.polygons(ext(i))))
 		xbnds$vid <- 1:nrow(xbnds)
 	}
 	if (!is.null(horizontal)) {
@@ -183,7 +183,7 @@ strip_polygon <- function(x, vertical, horizontal) {
 		})
 		ybnds <- matrix(c(ex$ymin, rep(edges,rep(2,length(edges))), ex$ymax), ncol=2, byrow=TRUE)
 		ybnds <- cbind(ex$xmin, ex$xmax, ybnds)
-		ybnds <- do.call(rbind, apply(ybnds, 1, \(i) as.polygons(ext(i))))
+		ybnds <- do.call(rbind, apply(ybnds, 1, function(i) as.polygons(ext(i))))
 		ybnds$hid <- 1:nrow(ybnds)
 
 		if (!is.null(vertical)) {