Fix GitHub issue #166.

fweber144 · fweber144 · commit 46c90d32dfdd · 2021-02-04T16:22:05.000+01:00
diff --git a/R/loo_moment_matching.R b/R/loo_moment_matching.R
@@ -151,6 +151,7 @@ loo_moment_match.default <- function(x, loo, post_draws, log_lik_i,
     }
   }
   if (!is.null(loo$psis_object)) {
+    attr(loo$psis_object, "norm_const_log") <- matrixStats::colLogSumExps(loo$psis_object$log_weights)
     loo$psis_object$diagnostics <- loo$diagnostics
   }
 

Original file line number	Diff line number	Diff line change
`@@ -151,6 +151,7 @@ loo_moment_match.default <- function(x, loo, post_draws, log_lik_i,`
`151`	`151`	`}`
`152`	`152`	`}`
`153`	`153`	`if (!is.null(loo$psis_object)) {`
	`154`	`+ attr(loo$psis_object, "norm_const_log") <- matrixStats::colLogSumExps(loo$psis_object$log_weights)`
`154`	`155`	`loo$psis_object$diagnostics <- loo$diagnostics`
`155`	`156`	`}`
`156`	`157`