(v1.4.0.9060) ab class selector fix

This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2021-01-04 13:39:06 +01:00
1 parent c9de74c81a
commit 8d117820b8
15 files changed
+20 -19

No files matched your search

+1 -1
View File
@@ -527,7 +527,7 @@ meet_criteria <- function(object,
}
get_current_data <- function(arg_name, call) {
if (as.double(R.Version()$major) + (as.double(R.Version()$minor) / 100) < 3.2) {
if (as.double(R.Version()$major) + (as.double(R.Version()$minor) / 10) < 3.2) {
if (is.na(arg_name)) {
warning_("this function can only be used in R >= 3.2", call = call)
return(data.frame())
+1 -1
View File
@@ -164,7 +164,7 @@ ab_selector <- function(ab_class, function_name) {
meet_criteria(ab_class, allow_class = "character", has_length = 1, .call_depth = 1)
meet_criteria(function_name, allow_class = "character", has_length = 1, .call_depth = 1)
if (as.double(R.Version()$major) + (as.double(R.Version()$minor) / 100) < 3.2) {
if (as.double(R.Version()$major) + (as.double(R.Version()$minor) / 10) < 3.2) {
warning_(function_name, "() can only be used in R >= 3.2", call = FALSE)
return(NULL)
}