diff --git a/NAMESPACE b/NAMESPACE index 976d3e9..7b03c87 100755 --- a/NAMESPACE +++ b/NAMESPACE @@ -54,6 +54,7 @@ S3method(get_diagnostic_messages,SBC_RStanOptimizing_diagnostics_summary) S3method(get_diagnostic_messages,SBC_nuts_diagnostics_summary) S3method(get_diagnostic_messages,SBC_results) S3method(get_diagnostic_messages,SBC_results_summary) +S3method(get_diagnostic_messages,default) S3method(length,SBC_datasets) S3method(length,SBC_results) S3method(plot_contraction,SBC_results) diff --git a/R/results.R b/R/results.R index b9daf52..25172b4 100644 --- a/R/results.R +++ b/R/results.R @@ -1077,6 +1077,13 @@ get_diagnostic_messages <- function(x) { } +#' @export +#' @rdname get_diagnostic_messages +get_diagnostic_messages.default <- function(x) { + SBC_diagnostic_messages(data.frame(message = character(0), ok = logical(0))) +} + + #' Check diagnostics and issue warnings when those fail. #' #' @rdname check_all_SBC_diagnostics