tests/testthat/test-vectSamp.R

test_that("vectSamp works", {
  data("mosquito")
  n<-5
  vectSamp_list<-vectSamp(Yotu,n)
  expect_equal(length(vectSamp_list), n)
})

Try the MUVR2 package in your browser

Any scripts or data that you put into this service are public.

MUVR2 documentation built on Sept. 16, 2024, 9:06 a.m.