From 809a28d5502fbd6fd4a6ee72cf958b56ca1d11ae Mon Sep 17 00:00:00 2001
From: Johannes Pfeifer <jpfeifer@gmx,de>
Date: Mon, 24 Mar 2014 13:50:08 +0100
Subject: [PATCH] Fix invalid check for size of interval in Geweke
Prevents specifying different interval values
(cherry picked from commit 2c9c585d6efa66cdab1139dd9daed956d8b03731)
---
matlab/McMCDiagnostics.m | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/matlab/McMCDiagnostics.m b/matlab/McMCDiagnostics.m
index 83945ac132..ed719034cf 100644
--- a/matlab/McMCDiagnostics.m
+++ b/matlab/McMCDiagnostics.m
@@ -81,7 +81,7 @@ end
if nblck == 1 % Brooks and Gelman tests need more than one block
convergence_diagnostics_geweke=zeros(npar,4+2*length(options_.convergence.geweke.taper_steps));
- if any(options_.convergence.geweke.geweke_interval<0) || any(options_.convergence.geweke.geweke_interval>1) || length(any(options_.convergence.geweke.geweke_interval<0))~=2 ...
+ if any(options_.convergence.geweke.geweke_interval<0) || any(options_.convergence.geweke.geweke_interval>1) || length(options_.convergence.geweke.geweke_interval)~=2 ...
|| (options_.convergence.geweke.geweke_interval(2)-options_.convergence.geweke.geweke_interval(1)<0)
fprintf('\nCONVERGENCE DIAGNOSTICS: Invalid option for geweke_interval. Using the default of [0.2 0.5].\n')
options_.convergence.geweke.geweke_interval=[0.2 0.5];
--
GitLab