From 81a1d803b409c8cbc1a64b9bbfa55750efdf147e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Scylla=29?= Date: Mon, 31 Jul 2017 12:14:01 +0200 Subject: [PATCH] Fixed initial period (lagged by one period without reason). (cherry picked from commit ef0afc1b7571df79d60812f65cbefa02a2ffc450) --- matlab/set_historical_values.m | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/matlab/set_historical_values.m b/matlab/set_historical_values.m index d57662f35..ef42f2563 100644 --- a/matlab/set_historical_values.m +++ b/matlab/set_historical_values.m @@ -36,7 +36,7 @@ if ischar(initialperiod) end % Initialize endo_histval. -M_.endo_histval = zeros(M_.endo_nbr, M_.maximum_endo_lag); +M_.endo_histval = zeros(M_.endo_nbr, M_.max_endo_lag_orig); % Fill endo_histval. k = 1; @@ -45,7 +45,7 @@ for i = 1:M_.endo_nbr if M_.lead_lag_incidence(1,i) > 0 if any(strcmp(deblank(M_.endo_names(i,:)),ds.name)) M_.endo_histval(i,M_.maximum_endo_lag) = ... - ds{deblank(M_.endo_names(i,:))}(initialperiod-1).data; + ds{deblank(M_.endo_names(i,:))}(initialperiod).data; else error(sprintf('Can''t find %s in dseries', deblank(M_.endo_names(i,:)))) end @@ -55,7 +55,7 @@ for i = 1:M_.endo_nbr if a.type == 1 if any(strcmp(deblank(M_.endo_names(a.orig_index,:)), ds.name)) M_.endo_histval(i,M_.maximum_endo_lag) = ... - ds{deblank(M_.endo_names(a.orig_index,:))}(initialperiod-1+a.orig_lead_lag).data; + ds{deblank(M_.endo_names(a.orig_index,:))}(initialperiod+a.orig_lead_lag).data; else error(sprintf('Can''t find %s in dseries', deblank(M_.endo_names(a.orig_index,:)))) end