fix arg defaults

ropensci · Oct 31, 2024 · 3e1415d · 3e1415d
1 parent 1d0c7c4
commit 3e1415d
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/distance_to_leader.R b/R/distance_to_leader.R
@@ -75,7 +75,10 @@
 #'
 #' # Calculate distance to leader
 #' distance_to_leader(DT, coords = c('X', 'Y'))
-distance_to_leader <- function(DT, coords = c('x', 'y'), group = 'group') {
+distance_to_leader <- function(
+    DT = NULL,
+    coords = NULL,
+    group = NULL) {
   stopifnot(first(coords) %in% colnames(DT))
   stopifnot(last(coords) %in% colnames(DT))
   stopifnot(group %in% colnames(DT))