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

(v2.1.1.9183) unit test for older R versions

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2025-03-03 14:54:42 +01:00
1 parent 9a9468fa84
commit e28dd86c43
9 files changed
+13 -8
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

tests/testthat/test-_misc.R
+8 -3
View File
@@ -67,10 +67,15 @@ check_df <- function(check_element, return_val = 0) {
}
df <- example_isolates[, check_df("x")]
expect_true(is_right, info = "the environmental data cannot be found for base/x")
expect_true(is_right, info = "the environmental data cannot be found for base/x (1)")
df <- example_isolates[c(1:3), check_df("x")]
expect_true(is_right, info = "the environmental data cannot be found for base/x")
if (getRversion() < "4.0.0") {
df <- example_isolates[c(1:3), check_df("xx")]
expect_true(is_right, info = "the environmental data cannot be found for base/xx")
} else {
df <- example_isolates[c(1:3), check_df("x")]
expect_true(is_right, info = "the environmental data cannot be found for base/x (2)")
}
if (AMR:::pkg_is_available("dplyr", min_version = "1.0.0", also_load = TRUE)) {
df <- example_isolates %>% select(mo, check_df("data123"))