P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 12:31:58 +02:00
Code Releases Activity

(v0.9.0.9029) add uti to as.rsi()

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2020-02-20 13:19:23 +01:00
parent a5db82c2fb
commit c6184a0fb8
71 changed files with 1129 additions and 800 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
tests/testthat/test-rsi.R
View File

@ -81,6 +81,19 @@ test_that("mic2rsi works", {
as.rsi() %>%
pull(amox_mic) %>%
is.rsi())
expect_warning(data.frame(mo = "E. coli",
NIT = c("<= 2", 32)) %>%
as.rsi())
expect_message(data.frame(mo = "E. coli",
NIT = c("<= 2", 32),
uti = TRUE) %>%
as.rsi())
expect_message(
data.frame(mo = "E. coli",
NIT = c("<= 2", 32),
specimen = c("urine", "blood")) %>%
as.rsi())
})
test_that("disk2rsi works", {