library(testthat) # # DATA AND FIT ARE NOT SEND TO CRAN TO SAVE PACKAGE SIZE # testthat::skip_on_cran() # # LOAD DATA data("cadmium2") Cd2 = cadmium2 data("cadmium_daphnia") Cdd = cadmium_daphnia # Cd2 <- readRDS(test_path("fixtures", "cadmium2.rds")) # Cdd <- readRDS(test_path("fixtures", "cadmium_daphnia.rds")) # reco27 <- readRDS(test_path("fixtures", "reco27.rds")) # # LOAD FIT # fit_sCd2 <- readRDS(test_path("fixtures", "fit_sCd2.rds")) # fit_rCd2 <- readRDS(test_path("fixtures", "fit_rCd2.rds")) # fit_gCdd <- readRDS(test_path("fixtures", "fit_gCdd.rds")) # fit_gCddc <- readRDS(test_path("fixtures", "fit_gCddc.rds")) # # fit_g27n <- readRDS(test_path("fixtures", "fit_g27n.rds")) # fit_g27g <- readRDS(test_path("fixtures", "fit_g27g.rds")) # fit_g27nt <- readRDS(test_path("fixtures", "fit_g27nt.rds")) # fit_g27nc <- readRDS(test_path("fixtures", "fit_g27nc.rds")) # fit_g27gc <- readRDS(test_path("fixtures", "fit_g27gc.rds")) # fit_g27ntc <- readRDS(test_path("fixtures", "fit_g27ntc.rds"))