tests/testthat/test-install.R

test_that("Models install from allometric/models repository", {
  skip_on_cran()
  delete_models(verbose = FALSE)
  install_models(verbose = FALSE)

  models_dir_check <- system.file("models-main", package = "allometric")

  expect_false(models_dir_check == "")

  parameters_dir_check <- system.file(
    "models-main/parameters", package = "allometric"
  )

  publications_dir_check <- system.file(
    "models-main/publications", package = "allometric"
  )

  expect_false(parameters_dir_check   == "")
  expect_false(publications_dir_check == "")
})

Try the allometric package in your browser

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

allometric documentation built on Nov. 8, 2023, 1:07 a.m.