tests/tinytest.R

In dimensio: Multivariate Data Analysis

if (requireNamespace("tinytest", quietly = TRUE)) {
  ## Force tests to be executed if in dev release
  ## (which we define as having a sub-release)
  NOT_CRAN <- length(unclass(packageVersion("dimensio"))[[1]]) == 4

  tinytest::test_package("dimensio", at_home = NOT_CRAN)
}