Skip to content

Commit 0931621

Browse files
committed
reduce tests and vignettes build timings for CRAN
1 parent af44ad5 commit 0931621

File tree

7 files changed

+44
-56
lines changed

7 files changed

+44
-56
lines changed

docs/articles/multiple_endpoints.html

Lines changed: 34 additions & 41 deletions
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.
-113 Bytes
Loading
-5.42 KB
Loading

docs/pkgdown.yml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -8,5 +8,5 @@ articles:
88
multiple_endpoints: multiple_endpoints.html
99
patient_data_input: patient_data_input.html
1010
posologyr_user_defined_models: posologyr_user_defined_models.html
11-
last_built: 2024-02-08T18:35Z
11+
last_built: 2024-02-09T10:28Z
1212

tests/testthat/test_multi_outputs.R

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,7 @@
11
# Difference from the usual warfarin PKPD model: some IIV are set to zero to
22
# reduce the dimension of omega and reduce the execution time of the test
33

4+
if(Sys.getenv("POSOLOGYR_DEV_MACHINE")=="TRUE"){
45
mod_warfarin_nlmixr <- list(
56
ppk_model = rxode2::rxode({
67
ktr <- exp(THETA_ktr + ETA_ktr)
@@ -84,7 +85,7 @@ test_that("MAP estimates match nlmixr posthoc estimates for multi endpoints mode
8485
expect_equal(map_warf_01$model$kout[1], 0.05502322, tolerance=1e-3)
8586
expect_equal(map_warf_01$model$e0[1], 96.54411, tolerance=1e-3)
8687
})
87-
88+
}
8889
## estimates from nlmixr
8990
#pk.turnover.emax3 <- function() {
9091
# ini({

tests/testthat/test_rxui.R

Lines changed: 2 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,4 @@
11
test_that("readme model equivalent", {
2-
skip_on_cran()
3-
42
patient_data <- data.frame(ID=1,
53
TIME=c(0.0,1.0,14.0),
64
DV=c(NA,25.0,5.5),
@@ -217,11 +215,9 @@ test_that("mod_vancomycin_Goti2018", {
217215

218216
})
219217

220-
218+
if(Sys.getenv("POSOLOGYR_DEV_MACHINE")=="TRUE"){ #skip on CRAN or github actions
221219
test_that("warfarin example", {
222220

223-
skip_on_cran()
224-
225221
mod_warfarin_nlmixr <- function() {
226222
ini({
227223
THETA_ktr=0.106
@@ -288,3 +284,4 @@ test_that("warfarin example", {
288284
map_warf_01$eta, tolerance =3)
289285

290286
})
287+
}

vignettes/multiple_endpoints.Rmd

Lines changed: 5 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -102,14 +102,11 @@ mod_warfarin_nlmixr <- list(
102102

103103
```{r}
104104
warf_01 <- data.frame(ID=1,
105-
TIME=c(0.0,0.5,1.0,2.0,3.0,6.0,9.0,12.0,24.0,24.0,36.0,
106-
36.0,48.0,48.0,72.0,72.0,96.0,120.0,144.0),
107-
DV=c(0.0,0.0,1.9,3.3,6.6,9.1,10.8,8.6,5.6,44.0,4.0,27.0,
108-
2.7,28.0,0.8,31.0,60.0,65.0,71.0),
109-
DVID=c("cp","cp","cp","cp","cp","cp","cp","cp","cp","pca",
110-
"cp","pca","cp","pca","cp","pca","pca","pca","pca"),
111-
EVID=c(1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0),
112-
AMT=c(100,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0))
105+
TIME=c(0.0,1.0,3.0,6.0,24.0,24.0,36.0,36.0,48.0,48.0,72.0,72.0,144.0),
106+
DV=c(0.0,1.9,6.6,10.8,5.6,44.0,4.0,27.0,2.7,28.0,0.8,31.0,71.0),
107+
DVID=c("cp","cp","cp","cp","cp","pca","cp","pca","cp","pca","cp","pca","pca"),
108+
EVID=c(1,0,0,0,0,0,0,0,0,0,0,0,0),
109+
AMT=c(100,0,0,0,0,0,0,0,0,0,0,0,0))
113110
warf_01
114111
```
115112

0 commit comments

Comments
 (0)