diff --git a/tests/testthat/test-errorProfiles.R b/tests/testthat/test-errorProfiles.R index 252ad329..32bb2b57 100644 --- a/tests/testthat/test-errorProfiles.R +++ b/tests/testthat/test-errorProfiles.R @@ -1,6 +1,7 @@ test_that("errorProfiles works in default settings", { skip_on_cran() + skip_on_os("mac", arch = "aarch64") data(splotdata) splotdata <- sf::st_drop_geometry(splotdata) predictors <- terra::rast(system.file("extdata","predictors_chile.tif", package="CAST")) @@ -31,6 +32,7 @@ test_that("errorProfiles works in default settings", { test_that("errorProfiles works in with LPD", { skip_on_cran() + skip_on_os("mac", arch = "aarch64") data(splotdata) splotdata <- sf::st_drop_geometry(splotdata) predictors <- terra::rast(system.file("extdata","predictors_chile.tif", package="CAST")) @@ -59,6 +61,7 @@ test_that("errorProfiles works in with LPD", { test_that("errorProfiles works for multiCV", { skip_on_cran() + skip_on_os("mac", arch = "aarch64") data(splotdata) splotdata <- sf::st_drop_geometry(splotdata) predictors <- terra::rast(system.file("extdata","predictors_chile.tif", package="CAST")) diff --git a/tests/testthat/test-fss.R b/tests/testthat/test-fss.R index 1884f848..2ca6c1c7 100644 --- a/tests/testthat/test-fss.R +++ b/tests/testthat/test-fss.R @@ -1,5 +1,6 @@ test_that("ffs works with default arguments and the splotopen dataset (numerical only)",{ + skip_on_os("mac", arch = "aarch64") data("splotdata") splotdata = splotdata |> sf::st_drop_geometry() set.seed(1) @@ -22,6 +23,7 @@ test_that("ffs works with default arguments and the splotopen dataset (numerical test_that("ffs works with default arguments and the splotopen dataset (include categorial)",{ skip_on_cran() + skip_on_os("mac", arch = "aarch64") data("splotdata") splotdata = splotdata |> sf::st_drop_geometry() set.seed(1) @@ -40,6 +42,7 @@ test_that("ffs works with default arguments and the splotopen dataset (include c test_that("ffs works for classification with default arguments",{ skip_on_cran() + skip_on_os("mac", arch = "aarch64") data("splotdata") splotdata = splotdata |> sf::st_drop_geometry() splotdata$Biome = droplevels(splotdata$Biome) @@ -61,6 +64,7 @@ test_that("ffs works for classification with default arguments",{ test_that("ffs works for withinSE = TRUE",{ skip_on_cran() + skip_on_os("mac", arch = "aarch64") data("splotdata") splotdata = splotdata |> sf::st_drop_geometry() splotdata$Biome = droplevels(splotdata$Biome)