Added pinball loss accuracy metrics to inverval_accuracy_measures()

Resolves #379
tidyverts · Mar 2, 2024 · 7f17d97 · 7f17d97
1 parent d8fbe73
commit 7f17d97
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/accuracy.R b/R/accuracy.R
@@ -224,7 +224,7 @@ scaled_pinball_loss <- function(.dist, .actual, .train, level = 95, na.rm = TRUE
 #' @param level The level of the forecast interval.
 #' 
 #' @export
-interval_accuracy_measures <- list(winkler = winkler_score)
+interval_accuracy_measures <- list(winkler = winkler_score, pinball_loss, scaled_pinball_loss)
 
 #' @rdname distribution_accuracy_measures
 #' @export