tests/testthat/test-rkt_get_sampling_methods.R

context("rkt_get_sampling_methods")

test_that("use", {
  expect_true("random" %in% rkt_get_sampling_methods())
  expect_true("shortest" %in% rkt_get_sampling_methods())
  expect_true("longest" %in% rkt_get_sampling_methods())
})
richelbilderbeek/flechette documentation built on Dec. 30, 2019, 9:15 p.m.