tests/testthat/test-MmSimplex.R

test_that("MmSimple Example", {
  set.seed(1)
  D1 <- MmSimplex(10,40,10,cords = 1,randst = 1,phival = 50)
  expect_known_value(D1, "MmSimplex.test.output")
})

Try the simplexdesign package in your browser

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

simplexdesign documentation built on March 16, 2020, 5:06 p.m.