P281424/AMR
1
0 Fork 0
mirror of https://github.com/msberends/AMR.git synced 2026-10-01 04:13:33 +02:00
Code Releases Activity

(v1.3.0.9000) support across() in as.rsi()

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2020-08-10 11:44:58 +02:00
1 parent 791bb6d33f
commit 0d9602a6a9
31 files changed
+378 -141
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

tests/testthat/test-rsi.R
+4 -4
View File
@@ -39,10 +39,10 @@ test_that("rsi works", {
expect_equal(summary(as.rsi(c("S", "R"))),
structure(c("Class" = "rsi",
"%R" = "50% (n=1)",
"%SI" = "50% (n=1)",
"- %S" = "50% (n=1)",
"- %I" = "0% (n=0)"), class = c("summaryDefault", "table")))
"%R" = "50.0% (n=1)",
"%SI" = "50.0% (n=1)",
"- %S" = "50.0% (n=1)",
"- %I" = " 0.0% (n=0)"), class = c("summaryDefault", "table")))
expect_identical(as.logical(lapply(example_isolates, is.rsi.eligible)),
rep(FALSE, length(example_isolates)))