faster determination of abx

2025-07-09 04:42:22 +02:00 · 2019-05-20 19:12:41 +02:00
parent 6eb08a2ea3
commit 07d26cd485
25 changed files with 491 additions and 498 deletions
--- a/tests/testthat/test-mdro.R
+++ b/tests/testthat/test-mdro.R
@ -40,7 +40,7 @@ test_that("mdro works", {

  # septic_patients should have these finding using Dutch guidelines
  expect_equal(outcome %>% freq() %>% pull(count),
-               c(1989, 9, 2)) # 1989 neg, 9 pos, 2 unconfirmed
+               c(1969, 25, 6)) # 1969 neg, 25 unconfirmed, 6 pos

  expect_equal(
    suppressWarnings(