warn_xy_duplicates(): don't error on empty input *

florisvdh · florisvdh · commit c96421e09574 · 2021-01-11T10:18:52.000+01:00
This is especially useful after masking: when nothing comes out of
the spatial join, this internal function that checks for duplicate
coordinates should not error.
diff --git a/R/sf.R b/R/sf.R
@@ -105,7 +105,6 @@ warn_xy_duplicates <- function(x, y) {
     assert_that(is.numeric(x))
     assert_that(is.numeric(y))
     assert_that(all.equal(length(x), length(y)))
-    assert_that(length(x) > 0)
 
     n_duplicated <-
         data.frame(x = x, y = y) %>%
