diff --git a/R/objective_function_input_checks.R b/R/objective_function_input_checks.R index 7a7a5a0..2d30f7f 100644 --- a/R/objective_function_input_checks.R +++ b/R/objective_function_input_checks.R @@ -174,8 +174,10 @@ check_args_to_vary <- function( cat('\nThe independent arguments and their initial values:\n\n') utils::str(independent_args) - cat('\nThe dependent arguments and their initial values:\n\n') - utils::str(dependent_arg_function(independent_args)) + if(!is.null(dependent_arg_function)){ + cat('\nThe dependent arguments and their initial values:\n\n') + utils::str(dependent_arg_function(independent_args)) + } } # Make sure no drivers were specified