tests/testthat/_snaps/rep_sample_n.md

rep_sample_n checks input

Code
  rep_sample_n("a", size = 1)
Condition
  Error in `rep_sample_n()`:
  ! `tbl` must be 'data.frame', not 'character'.
Code
  rep_sample_n(population, size = "a")
Condition
  Error in `rep_sample_n()`:
  ! `size` must be 'single non-negative number', not 'character'.
Code
  rep_sample_n(population, size = 1:2)
Condition
  Error in `rep_sample_n()`:
  ! `size` must be 'single non-negative number', not 'integer'.
Code
  rep_sample_n(population, size = -1)
Condition
  Error in `rep_sample_n()`:
  ! `size` must be 'single non-negative number', not 'double'.
Code
  rep_sample_n(population, size = 1, replace = "a")
Condition
  Error in `rep_sample_n()`:
  ! `replace` must be 'TRUE or FALSE', not 'character'.
Code
  rep_sample_n(population, size = 1, reps = "a")
Condition
  Error in `rep_sample_n()`:
  ! `reps` must be 'single number not less than 1', not 'character'.
Code
  rep_sample_n(population, size = 1, reps = 1:2)
Condition
  Error in `rep_sample_n()`:
  ! `reps` must be 'single number not less than 1', not 'integer'.
Code
  rep_sample_n(population, size = 1, reps = 0.5)
Condition
  Error in `rep_sample_n()`:
  ! `reps` must be 'single number not less than 1', not 'double'.
Code
  rep_sample_n(population, size = 1, prob = "a")
Condition
  Error in `rep_sample_n()`:
  ! `prob` must be 'numeric vector with length `nrow(tbl)` = 5', not 'character'.
Code
  rep_sample_n(population, size = 1, prob = c(0.1, 0.9))
Condition
  Error in `rep_sample_n()`:
  ! `prob` must be 'numeric vector with length `nrow(tbl)` = 5', not 'double'.

rep_sample_n gives error on big sample size if replace=FALSE

Code
  rep_sample_n(population, size = n_population * 2)
Condition
  Error in `rep_sample_n()`:
  ! Asked sample size (10) is bigger than number of rows in data (5) while `replace` is FALSE. Use `replace = TRUE`.

rep_slice_sample checks input

Code
  rep_slice_sample("a", n = 1)
Condition
  Error in `rep_slice_sample()`:
  ! `.data` must be 'data.frame', not 'character'.
Code
  rep_slice_sample(population, n = "a")
Condition
  Error in `rep_slice_sample()`:
  ! `n` must be 'single non-negative number', not 'character'.
Code
  rep_slice_sample(population, n = 1:2)
Condition
  Error in `rep_slice_sample()`:
  ! `n` must be 'single non-negative number', not 'integer'.
Code
  rep_slice_sample(population, n = -1)
Condition
  Error in `rep_slice_sample()`:
  ! `n` must be 'single non-negative number', not 'double'.
Code
  rep_slice_sample(population, prop = "a")
Condition
  Error in `rep_slice_sample()`:
  ! `prop` must be 'single non-negative number', not 'character'.
Code
  rep_slice_sample(population, prop = 1:2)
Condition
  Error in `rep_slice_sample()`:
  ! `prop` must be 'single non-negative number', not 'integer'.
Code
  rep_slice_sample(population, prop = -1)
Condition
  Error in `rep_slice_sample()`:
  ! `prop` must be 'single non-negative number', not 'double'.
Code
  rep_slice_sample(population, n = 1, prop = 0.5)
Condition
  Error in `rep_slice_sample()`:
  ! Please supply exactly one of the `n` or `prop` arguments.
Code
  rep_slice_sample(population, n = 1, replace = "a")
Condition
  Error in `rep_slice_sample()`:
  ! `replace` must be 'TRUE or FALSE', not 'character'.
Code
  rep_slice_sample(population, n = 1, weight_by = "a")
Condition
  Error in `rep_slice_sample()`:
  ! `weight_by` must be 'a numeric vector with length `nrow(.data)` = 5 or an unquoted column name', not 'character'.
Code
  rep_slice_sample(population, n = 1, weight_by = c(0.1, 0.9))
Condition
  Error in `rep_slice_sample()`:
  ! `weight_by` must be 'a numeric vector with length `nrow(.data)` = 5 or an unquoted column name', not 'double'.
Code
  rep_slice_sample(population, n = 1, weight_by = wts)
Condition
  Error in `rep_slice_sample()`:
  ! The column wts provided to the `weight_by` argument is not in the supplied data.
Code
  rep_slice_sample(population, n = 1, reps = "a")
Condition
  Error in `rep_slice_sample()`:
  ! `reps` must be 'single number not less than 1', not 'character'.
Code
  rep_slice_sample(population, n = 1, reps = 1:2)
Condition
  Error in `rep_slice_sample()`:
  ! `reps` must be 'single number not less than 1', not 'integer'.
Code
  rep_slice_sample(population, n = 1, reps = 0.5)
Condition
  Error in `rep_slice_sample()`:
  ! `reps` must be 'single number not less than 1', not 'double'.

rep_slice_sample warns on big sample size if replace = FALSE

Code
  out <- rep_slice_sample(population, n = n_population * 2, reps = 1)
Condition
  Warning:
  Asked sample size (10) is bigger than number of rows in data (5) while `replace` is FALSE. Using number of rows as sample size.
Code
  out <- rep_slice_sample(population, prop = 2, reps = 1)
Condition
  Warning:
  Asked sample size (10) is bigger than number of rows in data (5) while `replace` is FALSE. Using number of rows as sample size.


tidymodels/infer documentation built on March 28, 2024, 7:02 p.m.