(v1.7.1.9077) skimr support only for newer R versions

inst/tinytest/test-ab.R

@@ -61,6 +61,9 @@ expect_equal(as.character(as.ab(c("mreopenem", "co-maoxiclav"))),
 
 expect_message(as.ab("cipro mero"))
 
+# based on Levenshtein distance
+expect_identical(ab_name("ceftazidim/avibactam", language = NULL), "Ceftazidime/avibactam")
+
 # assigning and subsetting
 x <- antibiotics$ab
 expect_inherits(x[1], "ab")

inst/tinytest/test-zzz.R

@@ -52,9 +52,6 @@ import_functions <- c(
 call_functions <- c(
   # cleaner
   "freq.default" = "cleaner",
-  # skimr
-  "inline_hist" = "skimr",
-  "sfl" = "skimr",
   # readxl
   "read_excel" = "readxl",
   # ggplot2
@@ -85,6 +82,12 @@ call_functions <- c(
   "xlab" = "ggplot2",
   "ylab" = "ggplot2"
 )
+if (pkg_is_available("skimr", also_load = FALSE, min_version = "2.0.0")) {
+  call_functions <- c(call_functions,
+                      # skimr
+                      "inline_hist" = "skimr",
+                      "sfl" = "skimr")
+}
 
 extended_functions <- c(
   "freq" = "cleaner",