Skip to content

Commit

Permalink
Because of CRAN run time requirements skip a bunch of tests
Browse files Browse the repository at this point in the history
  • Loading branch information
mattfidler committed Nov 29, 2023
1 parent a318c90 commit 6bfcfdc
Show file tree
Hide file tree
Showing 40 changed files with 4,590 additions and 4,493 deletions.
2 changes: 2 additions & 0 deletions .Rbuildignore
Original file line number Diff line number Diff line change
Expand Up @@ -16,6 +16,8 @@
^ggPMX_cheat_sheet_0_9_4.pptx$
^vignettes/ggPMX-nlmixr.Rmd$
^vignettes/bloq.Rmd$
^vignettes/ggPMX-guide.Rmd$
^vignettes/ggPMX_arch.png$
^man/figures/*.png$
^.github/*
^\.github$
Expand Down
6 changes: 3 additions & 3 deletions CRAN-SUBMISSION
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
Version: 1.2.9
Date: 2023-05-31 20:00:26 UTC
SHA: 6b680c7d74e16bec73748b6130be3635c1ad6a91
Version: 1.2.11
Date: 2023-11-29 04:03:54 UTC
SHA: a318c9021aa8b0b202d716641b3efcb5b56d7764
4 changes: 3 additions & 1 deletion cran-comments.md
Original file line number Diff line number Diff line change
@@ -1,2 +1,4 @@
This is to correct the suggests problem that Prof. Ripley flagged
This submission is mainly to fix the issues flagged by CRAN

This submission also skips many tests on CRAN and removes vignettes
because they take too long to run
3 changes: 3 additions & 0 deletions tests/testthat/helper-skip.R
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
helper_skip <- function() {
interactive() || isTRUE(as.logical(Sys.getenv("NOT_CRAN", "false")))
}
22 changes: 12 additions & 10 deletions tests/testthat/test-2023table.R
Original file line number Diff line number Diff line change
@@ -1,18 +1,20 @@
test_that("Monolix 2023 tables read in correctly (Issue #369)", {
skip_if_not(file.exists(test_path("warfarin_PD_project.zip")))
.path <- normalizePath(test_path("warfarin_PD_project.zip"))
if (helper_skip()) {
test_that("Monolix 2023 tables read in correctly (Issue #369)", {
skip_if_not(file.exists(test_path("warfarin_PD_project.zip")))
.path <- normalizePath(test_path("warfarin_PD_project.zip"))

withr::with_tempdir({
withr::with_tempdir({

unzip(.path)
unzip(.path)

ctr <- pmx_mlxtran("warfarin_PD_project.mlxtran")
ctr <- pmx_mlxtran("warfarin_PD_project.mlxtran")

p_ctr <- ctr %>% param_table(return_table = TRUE)
p_ctr <- ctr %>% param_table(return_table = TRUE)

Names <- c("PARAM", "VALUE", "SE", "RSE")
Names <- c("PARAM", "VALUE", "SE", "RSE")

expect_equal(names(p_ctr), Names)
expect_equal(names(p_ctr), Names)

})
})
})
}
Loading

0 comments on commit 6bfcfdc

Please sign in to comment.