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

Added SVD for J matrix as output identification info.

time-shift
Marco Ratto 2011-05-10 10:11:25 +02:00
parent d31b2218ff
commit a45533caca
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
matlab/identification_analysis.m
View File

@ -115,6 +115,15 @@ if info(1)==0,
identification_checks(H(indH,:)./normH(:,ones(nparam,1)), 0);
[ide_lre.cond, ide_lre.ind0, ide_lre.indno, ide_lre.ino, ide_lre.Mco, ide_lre.Pco, ide_lre.jweak, ide_lre.jweak_pair] = ...
identification_checks(gp(indLRE,:)./normLRE(:,ones(size(gp,2),1)), 0);
[U, S, V]=svd(JJ(indJJ,:)./normJ(:,ones(nparam,1)),0);
S=diag(S);
if nparam>8
ide_moments.S = S([1:4, end-3:end]);
ide_moments.V = V(:,[1:4, end-3:end]);
else
ide_moments.S = S;
ide_moments.V = V;
end
indok = find(max(ide_moments.indno,[],1)==0);
ide_strength_J=NaN(1,nparam);