update utils::tail

equitable-equations · Apr 13, 2024 · de93339 · de93339
1 parent a6145a1
commit de93339
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/NAMESPACE b/NAMESPACE
@@ -48,4 +48,5 @@ importFrom(memoise,memoise)
 importFrom(rlang,.data)
 importFrom(rlang,is_interactive)
 importFrom(stats,sd)
+importFrom(utils,tail)
 importFrom(utils,txtProgressBar)
diff --git a/R/transect_subplot_inventories.R b/R/transect_subplot_inventories.R
@@ -24,6 +24,7 @@
 #'
 #' @import dplyr
 #' @importFrom rlang .data
+#' @importFrom utils tail
 #'
 #' @examples
 #' \donttest{
@@ -64,7 +65,7 @@ transect_subplot_inventories <- function(transect) {
   }
 
   lengths <- diff(boundary_rows) - 3
-  lengths <- c(lengths, nrow(transect) - tail(boundary_rows, 1) - 2)
+  lengths <- c(lengths, nrow(transect) - utils::tail(boundary_rows, 1) - 2)
 
   start_rows <- boundary_rows + 2
   end_rows <- start_rows + lengths - 1