diff --git a/R/generateDesign.R b/R/generateDesign.R index 4e04e7e2..1137e64b 100644 --- a/R/generateDesign.R +++ b/R/generateDesign.R @@ -231,7 +231,7 @@ determineReqVectorized = function(pars) { # heuristic if we allow this requirement to be evaluated in an vectorized fashion vapply(X = lapply(pars, function(p) p$requires), function(req) { # vectorized if no "&&", "||" or "(" is detected - !grepl(x = deparse(req), pattern = "\\|\\||&&|\\(") + !any(grepl(x = deparse(req), pattern = "\\|\\||&&|\\(")) }, FUN.VALUE = logical(1)) }