tests/testthat/test-k.sample.profile.R

test_that("profile tests work" , {
  data <- cbind(iris[,5], iris[,1:4])
  expect_type(k.sample.profile(data, K = 3), "list")
})
Ammlakh/stat431package documentation built on May 7, 2022, 9:48 p.m.