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

rsi for freq

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2018-08-01 22:37:28 +02:00
1 parent d8f70a74de
commit edd2dd09dc
8 files changed
+30 -44
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

tests/testthat/test-classes.R
+2 -2
View File
@@ -17,8 +17,8 @@ test_that("rsi works", {
"<NA>" = "0",
"Sum S" = "1",
"Sum IR" = "1",
"Sum R" = "1",
"Sum I" = "0"))
"-Sum R" = "1",
"-Sum I" = "0"))
})
test_that("mic works", {
tests/testthat/test-freq.R
+2
View File
@@ -19,6 +19,8 @@ test_that("frequency table works", {
expect_output(print(freq(septic_patients$hospital_id)))
# table
expect_output(print(freq(table(septic_patients$sex, septic_patients$age))))
# rsi
expect_output(print(freq(septic_patients$amcl)))
library(dplyr)
expect_output(septic_patients %>% select(1:2) %>% freq() %>% print())