force sf

larmarange · May 15, 2023 · 276cb83 · 276cb83
1 parent 297bdd8
commit 276cb83
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/as.prevR.r b/R/as.prevR.r
@@ -167,6 +167,7 @@ as.prevR <- function(data,
     sf::st_crs(boundary) <- projCRS
     attr(boundary, "valid") <- FALSE
   } else {
+    boundary <- as(boundary, "sf")
     if (!inherits(boundary, "sf")) {
       stop("the class of 'boundary' must be sf.", call. = FALSE)
     }