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

(v1.6.0.9062) code consistency

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-05-24 00:06:28 +02:00
parent 07939b1a14
commit 06302d296a
23 changed files with 48 additions and 45 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
inst/tinytest/test-ab_class_selectors.R
View File

@ -23,7 +23,7 @@
# how to conduct AMR data analysis: https://msberends.github.io/AMR/ #
# ==================================================================== #
if (!AMR:::current_R_older_than(3.2)) {
if (getRversion() >= "3.2") {
# antibiotic class selectors require at least R-3.2
expect_true(ncol(example_isolates[, aminoglycosides(), drop = FALSE]) < ncol(example_isolates))
expect_true(ncol(example_isolates[, betalactams(), drop = FALSE]) < ncol(example_isolates))

2
inst/tinytest/test-mic.R
View File

@ -85,7 +85,7 @@ suppressWarnings(expect_identical(log1p(x), log1p(x_double)))
suppressWarnings(expect_identical(cos(x), cos(x_double)))
suppressWarnings(expect_identical(sin(x), sin(x_double)))
suppressWarnings(expect_identical(tan(x), tan(x_double)))
if (!AMR:::current_R_older_than(3.1)) {
if (getRversion() >= "3.1") {
suppressWarnings(expect_identical(cospi(x), cospi(x_double)))
suppressWarnings(expect_identical(sinpi(x), sinpi(x_double)))
suppressWarnings(expect_identical(tanpi(x), tanpi(x_double)))