# Return error message
if (FALSE) {
check_inputs(iris, c("Sepal.Length", "mpg"))
}
#' # Return warning message
check_inputs(iris, c("Sepal.Length", "mpg"), return = "warning")
# Return variable names
check_inputs(iris, c("Sepal.Length", "Sepal.Width", "RandomVariable"), return = "names")
Run the code above in your browser using DataLab