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

fix for macOS and older tidyr versions

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2018-07-11 12:34:02 +02:00
parent eca406b18b
commit e3e10c2e88
4 changed files with 9 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
tests/testthat/test-freq.R
View File

@ -18,9 +18,7 @@ test_that("frequency table works", {
# factor
expect_output(print(freq(septic_patients$hospital_id)))
# table
#if (Sys.info()['sysname'] %in% c("Windows", "Linux")) {
expect_output(print(freq(table(septic_patients$sex, septic_patients$age))))
#}
expect_output(print(freq(table(septic_patients$sex, septic_patients$age))))
library(dplyr)
expect_output(septic_patients %>% select(1:2) %>% freq() %>% print())