fix a comment, see

<#496 (comment)>
stan-dev · Jan 8, 2025 · 6e03f7d · 6e03f7d
1 parent 9692929
commit 6e03f7d
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/summary_funs.R b/R/summary_funs.R
@@ -331,7 +331,10 @@ get_stat <- function(summaries, summaries_baseline = NULL,
     # store for later calculations
     mse_e <- value
     if (!is.null(summaries_baseline)) {
-      # delta=TRUE, variance of difference of two normally distributed
+      # delta=TRUE, variance of difference of two normally distributed random
+      # variables (log-normally in case of MSE and RMSE, although the central
+      # limit theorem would ensure convergence -- probably slower, though -- to
+      # a normal distribution even for MSE and RMSE)
       mse_b <- mean(wobs * (mu_baseline - y)^2)
       var_mse_b <- .weighted_sd((mu_baseline - y)^2, wobs)^2 / n_full
       if (n_loo < n_full) {