(v1.3.0.9023) optimalisation

2025-08-13 12:45:14 +02:00 · 2020-09-19 11:54:01 +02:00
parent 4e40e42011
commit d049cce69b
30 changed files with 104 additions and 578 deletions
--- a/tests/testthat/test-resistance_predict.R
+++ b/tests/testthat/test-resistance_predict.R
@ -35,8 +35,8 @@ test_that("prediction of rsi works", {
  expect_true(AMX_R[3] < AMX_R[20])

  x <- resistance_predict(example_isolates, col_ab = "AMX", year_min = 2010, model = "binomial")
-  plot(x)
-  ggplot_rsi_predict(x)
+  expect_success(y <- plot(x))
+  expect_success(y <- ggplot_rsi_predict(x))
  expect_error(ggplot_rsi_predict(example_isolates))

  library(dplyr)