diff options
| author | Gertjan van den Burg <gertjanvandenburg@gmail.com> | 2020-08-30 21:40:23 +0100 |
|---|---|---|
| committer | Gertjan van den Burg <gertjanvandenburg@gmail.com> | 2020-08-30 21:40:23 +0100 |
| commit | 11be90a6e2e9921da3b2b6580815fda457a04023 (patch) | |
| tree | 4cf676d76151a1b3e9f23e3dd3e7104595b50c8c /R/predict.gensvm.grid.R | |
| parent | Add cran-release to buildignore (diff) | |
| download | rgensvm-11be90a6e2e9921da3b2b6580815fda457a04023.tar.gz rgensvm-11be90a6e2e9921da3b2b6580815fda457a04023.zip | |
Properly handle errors
Diffstat (limited to 'R/predict.gensvm.grid.R')
| -rw-r--r-- | R/predict.gensvm.grid.R | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/R/predict.gensvm.grid.R b/R/predict.gensvm.grid.R index 9d0bc53..e74822d 100644 --- a/R/predict.gensvm.grid.R +++ b/R/predict.gensvm.grid.R @@ -49,8 +49,7 @@ predict.gensvm.grid <- function(object, newdata, ...) { if (is.null(object$best.estimator)) { - cat("Error: Can't predict, the best.estimator element is NULL\n") - return + stop("Error: Can't predict, the best.estimator element is NULL\n") } return(predict(object$best.estimator, newdata, ...)) |