stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Partial info/Octave compatibility fix: ismember() does not work with char arrays under Octave

time-shift
Sébastien Villemot 2010-10-11 16:48:16 +02:00
parent d6c035aaea
commit 8849dd2bc9
2 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
matlab/partial_information/PCL_Part_info_irf.m
View File

@ -29,7 +29,10 @@ function y=PCL_Part_info_irf( H, varobs, ivar, M_, dr, irfpers,ii)
% The jump variables have dimension NETA
[junk,OBS] = ismember(varobs,M_.endo_names,'rows');
OBS = [];
for i=1:rows(varobs)
OBS = [OBS find(strcmp(deblank(varobs(i,:)), cellstr(M_.endo_names))) ];
end
NOBS = length(OBS);
G1=dr.PI_ghx;

7
matlab/partial_information/PCL_Part_info_moments.m
View File

@ -1,4 +1,4 @@
function AutoCOR_YRk=PCL_Part_info_irmoments( H, varobs, dr,ivar)
function AutoCOR_YRk=PCL_Part_info_moments( H, varobs, dr,ivar)
% sets up parameters and calls part-info kalman filter
% developed by G Perendia, July 2006 for implementation from notes by Prof. Joe Pearlman to
% suit partial information RE solution in accordance with, and based on, the
@ -31,7 +31,10 @@ function AutoCOR_YRk=PCL_Part_info_irmoments( H, varobs, dr,ivar)
warning_old_state = warning;
warning off
[junk,OBS] = ismember(varobs,M_.endo_names,'rows');
OBS = [];
for i=1:rows(varobs)
OBS = [OBS find(strcmp(deblank(varobs(i,:)), cellstr(M_.endo_names))) ];
end
NOBS = length(OBS);
G1=dr.PI_ghx;