fix test

Former-commit-id: d8362e82a003010e017231a34bc9afc778a355d7
Former-commit-id: 5f7e515ab0679a7d5c8813f4af1d83585f34732d
Former-commit-id: acf5bff1e6133d8faa8c8dc01e37678e7cbe58ca

tests/testthat/test-simulation_report.R

@@ -24,7 +24,7 @@ eval_data <- data.frame(description = c("A", "A", "A"), isDE = c(TRUE, NA, FALSE
 test_that("isValidEvalInput with valid input", {
   
     # Définir des données de test
-    mock_obj <- list(settings = NULL, init = NULL, groundTruth = NULL, counts = NULL, metadata = NULL)
+    mock_obj <- list(settings = NULL, init = NULL, groundTruth = NULL, counts = NULL, metadata = NULL, scaling_factors = NULL)
     list_gene <- c("gene1", "gene2", "gene3")
     list_tmb <- list(glmmTMB1 = NULL, glmmTMB2 = NULL)
     dds <- NULL