Merge branch 'patch-2' of github.com:faridcher/sf into faridcher-patch-2

edzer · edzer · commit 83bc795aba41 · 2024-02-08T23:03:12.000+01:00
diff --git a/R/join.R b/R/join.R
@@ -174,7 +174,8 @@ st_join.sf = function(x, y, join = st_intersects, ..., suffix = c(".x", ".y"),
 	if (inherits(x, "tbl_df") && requireNamespace("dplyr", quietly = TRUE))
 		st_sf(dplyr::bind_cols(x[ix,], y[unlist(i), , drop = FALSE]))
   	else
-		st_sf(cbind(as.data.frame(x)[ix,], y[unlist(i), , drop = FALSE]))	
+	        st_sf(cbind(as.data.frame(x)[ix, ,drop=FALSE], y[unlist(i), , drop = FALSE]))
+	
 }
 
 #' @export

Original file line number	Diff line number	Diff line change
`@@ -174,7 +174,8 @@ st_join.sf = function(x, y, join = st_intersects, ..., suffix = c(".x", ".y"),`
`174`	`174`	`if (inherits(x, "tbl_df") && requireNamespace("dplyr", quietly = TRUE))`
`175`	`175`	`st_sf(dplyr::bind_cols(x[ix,], y[unlist(i), , drop = FALSE]))`
`176`	`176`	`else`
`177`		`- st_sf(cbind(as.data.frame(x)[ix,], y[unlist(i), , drop = FALSE]))`
	`177`	`+ st_sf(cbind(as.data.frame(x)[ix, ,drop=FALSE], y[unlist(i), , drop = FALSE]))`
	`178`	`+`
`178`	`179`	`}`
`179`	`180`
`180`	`181`	`#' @export`