diff --git a/tests/testthat.R b/tests/testthat.R index 9034090..0476d09 100644 --- a/tests/testthat.R +++ b/tests/testthat.R @@ -1,6 +1,4 @@ library(testthat) library(growthcleanr) -testthat::skip_on_cran() - test_check("growthcleanr") diff --git a/tests/testthat/test-cdc.R b/tests/testthat/test-cdc.R index 2d7f2f3..86a96cc 100644 --- a/tests/testthat/test-cdc.R +++ b/tests/testthat/test-cdc.R @@ -1,3 +1,5 @@ +testthat::skip_on_cran() + test_that("ext_bmiz produces comparable output to CDC SAS implementation", { # run ext_bmiz on input data mydatapath <- diff --git a/tests/testthat/test-cleangrowth.R b/tests/testthat/test-cleangrowth.R index 7585a14..5180485 100644 --- a/tests/testthat/test-cleangrowth.R +++ b/tests/testthat/test-cleangrowth.R @@ -1,3 +1,5 @@ +testthat::skip_on_cran() + test_that("growthcleanr works as expected on pediatric synthetic data", { # Run cleangrowth() on syngrowth data diff --git a/tests/testthat/test-utils.R b/tests/testthat/test-utils.R index 0712de3..d231407 100644 --- a/tests/testthat/test-utils.R +++ b/tests/testthat/test-utils.R @@ -1,3 +1,5 @@ +testthat::skip_on_cran() + test_that("splitinput splits files correctly with default values", { create_df <- function(num_ids, num_obs) { df <- data.frame(matrix(NA, nrow = num_ids * num_obs, ncol = 5))