Update documentation

Reference #157

R/bootdht.R

@@ -6,7 +6,10 @@
 #'
 #' @param model a model fitted by [`ds`] or a list of models
 #' @param flatfile Data provided in the flatfile format. See [`flatfile`] for
-#' details.
+#' details. Please note, it is a current limitation of bootdht that all 
+#' Sample.Label identifiers must be unique across all strata, i.e.transect
+#' ids must not be re-used from one strata to another. An easy way to achieve
+#' this is to paste together the stratum names and transect ids. 
 #' @param convert_units conversion between units for abundance estimation, see
 #' "Units", below. (Defaults to 1, implying all of the units are "correct"
 #' already.) This takes precedence over any unit conversion stored in `model`.

tests/testthat/test_bootdht.R

@@ -164,7 +164,7 @@ minke$distend <- vals[minke$bin+1]
 # remove exact distances
 minke$distance <- NULL
 
-test_that("Issue #158 is fixed (stratum names > 'Total' bug)", {
+test_that("Issue #147 is fixed (bootdht with distbegin/distend)", {
 
   skip_on_cran()
   mod1 <- ds(minke)
@@ -181,8 +181,7 @@ dat$Region.Label <- c(rep("StrataA", 30), rep("StrataB", 30))
 dat$distance <- abs(rnorm(nrow(dat), 0, 25))
 dat$size <- rpois(nrow(dat), 20)
 dat$ref.object <- dat$object
-
-test_that("Error raised when sampler ID not unique", {
+test_that("Error raised when sampler ID not unique (Issue #157)", {
 
   set.seed(123)
   expect_error(bootdht_resample_data(dat, c("Sample.Label")),