Merge pull request #863 from MichaelChirico/patch-2

Use ASCII hypen
epiforecasts · Jul 17, 2024 · 47040f1 · 47040f1
2 parents 6dddf17 + 4fee240
commit 47040f1
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/R/metrics-quantile.R b/R/metrics-quantile.R
@@ -618,7 +618,7 @@ ae_median_quantile <- function(observed, predicted, quantile_level) {
 #' The quantile score, also called pinball loss, for a single quantile
 #' level \eqn{\tau} is defined as
 #' \deqn{
-#'   \text{QS}_\tau(F, y) = 2 \cdot \{ \mathbf{1}(y \leq q_\tau) - \tau\} \cdot (q_\tau − y) =
+#'   \text{QS}_\tau(F, y) = 2 \cdot \{ \mathbf{1}(y \leq q_\tau) - \tau\} \cdot (q_\tau - y) =
 #'   \begin{cases}
 #' 2 \cdot (1 - \tau) * q_\tau - y,       & \text{if } y \leq q_\tau\\
 #' 2 \cdot \tau * |q_\tau - y|,           & \text{if } y > q_\tau,

diff --git a/man/quantile_score.Rd b/man/quantile_score.Rd
diff --git a/vignettes/scoring-rules.Rmd b/vignettes/scoring-rules.Rmd
@@ -390,7 +390,7 @@ See section [A note of caution] or @gneitingMakingEvaluatingPoint2011 for a disc
 The quantile score, also called pinball loss, for a single quantile level $\tau$ is defined as
 
 \begin{equation}
-    \text{QS}_\tau(F, y) = 2 \cdot \{ \mathbf{1}(y \leq q_\tau) - \tau\} \cdot (q_\tau − y) = 
+    \text{QS}_\tau(F, y) = 2 \cdot \{ \mathbf{1}(y \leq q_\tau) - \tau\} \cdot (q_\tau - y) = 
     \begin{cases}
         2 \cdot (1 - \tau) * q_\tau - y,       & \text{if } y \leq q_\tau\\
         2 \cdot \tau * |q_\tau - y|,           & \text{if } y > q_\tau,