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

(v0.7.1.9063) septic_patients -> example_isolates

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2019-08-27 16:45:42 +02:00
parent 7a6fce4eb8
commit 93be16484b
92 changed files with 1143 additions and 818 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
tests/testthat/test-skewness.R
View File

@ -22,13 +22,13 @@
context("skewness.R")
test_that("skewness works", {
expect_equal(skewness(septic_patients$age),
expect_equal(skewness(example_isolates$age),
-0.8958019,
tolerance = 0.00001)
expect_equal(unname(skewness(data.frame(septic_patients$age))),
expect_equal(unname(skewness(data.frame(example_isolates$age))),
-0.8958019,
tolerance = 0.00001)
expect_equal(skewness(matrix(septic_patients$age)),
expect_equal(skewness(matrix(example_isolates$age)),
-0.8958019,
tolerance = 0.00001)
})