add "sf::"

microly · microly · commit 5927cc9eb315 · 2019-12-01T23:18:52.000+08:00
diff --git a/R/layer-sf.R b/R/layer-sf.R
@@ -76,7 +76,7 @@ scale_type.sfc <- function(x) "identity"
 
 # helper function to determine the geometry type of sf object
 sf_geometry_type <- function(sf) {
-  geometry_type <- unique(as.vector(st_geometry_type(sf)))
+  geometry_type <- unique(as.vector(sf::st_geometry_type(sf)))
   if (length(geometry_type) != 1)  geometry_type <- "blend"
   geometry_type
 }

Original file line number	Diff line number	Diff line change
`@@ -76,7 +76,7 @@ scale_type.sfc <- function(x) "identity"`
`76`	`76`
`77`	`77`	`# helper function to determine the geometry type of sf object`
`78`	`78`	`sf_geometry_type <- function(sf) {`
`79`		`- geometry_type <- unique(as.vector(st_geometry_type(sf)))`
	`79`	`+ geometry_type <- unique(as.vector(sf::st_geometry_type(sf)))`
`80`	`80`	`if (length(geometry_type) != 1) geometry_type <- "blend"`
`81`	`81`	`geometry_type`
`82`	`82`	`}`