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

(v1.6.0.9000) custom EUCAST rules

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-04-07 08:37:42 +02:00
parent 551f99dc8f
commit 7a3139f7cc
49 changed files with 1363 additions and 594 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
tests/testthat/test-kurtosis.R
View File

@ -28,20 +28,20 @@ context("kurtosis.R")
test_that("kurtosis works", {
skip_on_cran()
expect_equal(kurtosis(example_isolates$age),
3.549319,
5.227999,
tolerance = 0.00001)
expect_equal(unname(kurtosis(data.frame(example_isolates$age))),
3.549319,
5.227999,
tolerance = 0.00001)
expect_equal(unname(kurtosis(data.frame(example_isolates$age), excess = TRUE)),
0.549319,
2.227999,
tolerance = 0.00001)
expect_equal(kurtosis(matrix(example_isolates$age)),
3.549319,
5.227999,
tolerance = 0.00001)
expect_equal(kurtosis(matrix(example_isolates$age), excess = TRUE),
0.549319,
2.227999,
tolerance = 0.00001)
})